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GIGA Soft Mouse Set 


The Giga Soft Mouse comes in a ready-to-use package 
including a very high quality mouse, an interface for the 
joystick port of the QL and a software package. 


The software consists of the following programs: 


Giga — Basic 
(Tested in QL User 1/86 p-58) 
(Tested in Sinclair User 6/86) 


A totally new type of Basic extension for the SINCLAIR QL. It adds more than 70 
new commands to SuperBasic. Features: 


» Full mousecontrol from Superbasic » Programmable function keys 
» Easily programmable MACINTOLSHstyle » User friendly full screen text editor 
pull down menus with 20 functions 
» Very sophisticated sprit animation >» Commands to program real windows 
commands with automatic reference of 
§Fully supercharge compatible background 


E. A. S. E. 


The new MACINTOSH style desktop 

Easily Applicable System Environment 

» E.A.S.E. is completely mousedriven. . 

» E.A.S.E. supports real pulldownmenus. 9» E.A.S.E. gives you fill 1/O control, all 

» E.A.S.E. can work with up to 7 real functions can easily be accessed by 
windows. _ using the mouse 

» E.A.S.E. has an inbuilt scientific calculator » E.A.S.E. windows can be scrolled 

Price (complete mouse + Giga Basic + and moved accross the screen. The 

E.A.S.E.) £89.95 from D.P.*inc VAT&P.&P. the size of awindow can be 

OR DM 250 + 15% VAT (plus 10% airmail § changed by using the mouse. 

postif required. 


Austria p ; 
ABO10 Graz 
Belgium Wim de Bont, Opdorstraat 37 

B 2910 Malderen-Longerzell 

Bonnefoy Elektronic 

7 Rue de la Republique 

F 26300 Bourg de Peage 

Engish Micro Conection 

15 Kilburn Cout, New Port Rhode 
Island 02840 

Spem Di Masoero Gudlo, 

Via Ponchielll 26c, 1 10100 Torino 

Dr. A. Tamburello Distaco SRL 

Via Poggio Moiano 34/c 100199 Roma 
Digital Precision, 220 The Avenue 
London E4 9SE 


France 


U.S.A. 


Italy 


Giga Soft QSound & QPrint 


Features: 3-channel AY 3 8910 Sound IC with lots of 
sound commands. Includes Interrupt-Sound-Queues 
with up to 4k of sound information per channel, 
envelope control, noise control etc. 

Supports a Centronics-compatible parallel printer 
port. (device name PAR_). You can chose between 
unbuffered output (very fast) or buffered (buffer size 
selectable up to 32K, interrupt driven, prints even 
when microdrives are running — immediate response 
to STOP however). Suite and Supercharge: 


Price £69.95 from D.P.* inc. VAT & P. & P. 
OR DM200 + 15% VAT (+10% airmail post if 
required) 


Giga Chrome 


Pull down menus 
Icon driven. 
Cursor controlled 
Mouse controlled 
Handles up to a 

4s complete A4 page. 


Price £34.95 from D.P.* in VAT & P.&P. OR 
DM100 + 15% VAT (plus 10% airmail post 
if required) 


Other features: 
%* Undo, *% Character * Designer 
%Texture Editor, % Extensive Block-handlingx 


Icon functions: 

Pencil, Rubber, Gum, Paint Brush, Paint-Roller, Spray Tin, 
Text, Lines, Boxes, Circles, Triangles, Ellipses and Lenses. 
The program needs at least 128K RAM-expansion. 

Free with Giga-chrome Spectrum-to-QL screen converter 
available on cartridge and on 31%” disk 


Send YOUR ORDER to: ABC Elektronic Hiigelstrabe 10-12 4800 Bielefeld 1 West Germany 
* or in the U.K. to Digital Precision, 222 The Avenue, London E4 9SE Tel: 01-527-5493 


| enclose cheque/PO payable to ABC ‘=. Digital Precision 


NAME: 
ADDRESS: 


POSTCODE: 
COUNTRY: 


Tick as 


: Cash on delivery only in 
appropriate 


Europe {not availble in U.K.) 
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THE FORTH PROTOCOL @ A new Basic alternative. 
SOFTWARE FILE © Adventures and arcade games reviewed. 
PUZZLE PAGE e The world’s first pub crawl problem. 


THE PROGS e@ Two great games and a useful utility. 


MICRODRIVE EXCHANGE e Featuring Program of the Month, Mushyman. 


NEXT 
MONTH 


QL Surgery 

What do you do when your QL refuses 
towork? Whether it is under warranty 
or suffering from old age, we tell you 
what to do and where to go. 


Company Profile 

The first of our occasional in-depth 
looks at the people who provide the 
products. 


Competitions 

We will be giving away six Eidersoft 
mice to the lucky winners of our prize 
draw. For the rest of you there is the 
chance to win a great graphics 
package. 


FIDERS OFT 


SYSTEMS & SOFTWARE 


ADMINISTRATION ONLY 0708 852647 


QL MOUSE 


Eidersoft are pleased to 
announce a superior QL 
Mouse with full supporting 
software using the ICE 
system. The three button 
mice mouse in beautiful QL 
black, comes complete with ICE in ROM and 
the ARTice mouse graphics program. The 
mouse is interfaced via the ROM cartridge 
port, which gives a very smooth and fast 
response that will not be outrun. Mouse control 
is implemented on all packages that use the 
ICE system. 


MICE complete. wu... Renee 
MICE exchange ICE ROM .........0. 


£89.95 + £2.00 P&P 
£69.95 + £2.00 P&P 


ICE x % xxx Sinclair user classic . : £24.95 
CHOICE The multitasking Editor .......ccccccseesereee £414.95 
ARTICE The ICE Graphics Package oo... £412.95 
ICE TOOLKIT Allows you to use ICE 

facilities in your own programs (inc. Mouse)........... £10.95 


COMPUTERISE YOUR BUSINESS NOW WITH... 


we fT 


IMPACCT is the only truly integrated accounting system that gives you all of the 
features that ledgers on other business micros can ata third of the cost. 


IMPACCT ACCOUNTING (Originally developed on mini computers!) Allows your QL 
to drive your business in the way you would wish. IMPACCT gives you the facility fo 
produce invoices, statements, keep an eye on your debtors and creditors, keep 
track of stock, produce a large variety of business reports and much more. 
IMPACCT is suitable for traders, limited companies and partnerships and has been 
fully checked by accountants. 


IMPACCT ACCOUNTING is flexible. You can set up your accounts in a variety of 
ways with full choice of account headings and names. IMPACCT is modular. You 
can start with any of the four modules and build up later to a fully integrated 
system. 


IMPACCT ACCOUNTING is multi-tasking! Using expanded memory and CHOice 
software IMPACCT will multitask with other applications (e.g. QUILL). 


IMPACCT ACCOUNTING is data compatible with the PSION programs! An export 
module allows you to export reports to QUILL, ABACUS and EASEL!! 


IMPACCT IS EASY TO LEARN and comes with a full user guide. Telephone support is 
available for a small fee and training courses are being organised monthly for 
very reasonable rates. 


IMPACCT ACCOUNTS 


£49.95 Each Module 
£139.95 Sales / Purchase / Nominal 
£179.95 Sales / Purchase / Nominal / Stock 
£49.95 Sales Order Processing 
£49.95 Purchase Order Processing (June 86) 


AVAILABLE NOW!! 


£89.95 Upgrade kit for those accounting packages that cannot give you a 
printed invoice .. . invoicing and stock control... 


SPECIAL PRICES FOR EIDERSOFT DISK SYSTEM 
CUSTOMERS 


QL Computer Repairs and suppor. 2 


Use the coupon opposite for further details. 


DELIVERY: ait tems ‘st CLass POST FREE UNLESS STATED OTHERWISE 


Prices are subject to alteration without prior notice. 


CREDIT CARD HOTLINE 
0708 851099 


Q+ DISK SYSTEMS 


Eidersoft and PCML are pleased to announce a new range of superior disk 
systems based on PCML/NEC hardware and a package of Eidersoft software. The 


systems are aimed at the professional QL user who requires stylish looks, a high 
degree of reliability and co-ordinated icon software and mouse. 


A distinctive feature of the package is the inclusion of the new Eidersoft QL 
Mouse with co-ordinated software and the new NEC CMOS third height 3.5” disk 


drives, which run much quieter, cooler and more reliably than most 3.5” drives. The 


disk systems are completely QL style and colour co-ordinated in black (including 
leads). 


There are two systems available, which are fully upgradable. The Q+ Disk 
System consists of a standard PCML disk interface (with built in toolkit commands) 
complete with twin 3.5” third height NEC disk drives, QL Mouse and the Eidersoft 


software package, which consists of ICE, a disk database, a jotter notepad, various . 


conversion programs and a printer spooler on disk. The Q@+Executive System is 


identical but has a 256k Ram disk interface and the CHOice multitasking software, A 


module is available to expand the Executive System to the full 640k Ram. Both 


systems come complete with a bound manual covering disk, mouse and software 


operation, 


Q+DISK SYSTEM-£399-00° Special introductory offer only £375 + £9 P&P 
Disk interface without memory (upgradable) + 23.5” NEC disk drive + ICE + 
Mouse + added special utility software. 


Q+EXECUHVE A997 00 Special introductory offer only £475 + £9 P&P 


Disk interface with added 256k memory + 2x3.5" NEC disk drives + ICE + Mouse + 


added-special utility software. 


“EXECUTIVE UPGRADE TO FULL 640K £95 


IMPORTANT NOTICE 


The recent announcement of the take over of the Sinclair name and marketing 
tights by Amstrad may have caused some concern to QL owners. Don’t panic. 


EIDERSOFT REGISTRATION 
Eidersoft pledges support of QL owners through 1986/87. To make sure that you 
are informed of recent developments and new products send in the coupon 
below. 


QL GAMES 


KARATE £14.95 


The best QL game we have seen. 


SPOOK. x & xk & £10.95 


“The game, however old the idea is, is probably the best version of Pacman for any 
micro computer.” PCW February 1986. ; 


BJ IN 3D LAND £12.95 
BU IS LOST AGAIN! THIS TIME IN A 3D MAZE THAT WILL POSE A CHALLENGE TO ALL (OVER 


70 SCREENS) 


BJ THE RETURN £10.95 


“As an improvement on the original, BJ The Return can only do well...” Sinclair QL 
World March 1986. 


CITADEL £9.95 


Unravel secrets of a giant city as you steer your craft through over 50 screens of 
danger and excitement. 


ZAPPER WITH EAGLE £9.95 


Two great machine code QL games for the price of one! Zapper the snappy arcade 


game is now joined by defender style Bais 


JOYSTICKS } 
Sureshot QL £49.95 + £1.50 P&P i 
Quickshot QL £12.95 + £1,50 P&P 
Atari/Ql Lead £5.49 + £1.50 P&P 


QL is trade-mark of Sinclair research LTD. IBM-AT is trade-mark of IBM INC. 


TODAY 


(we mean now) 


SANDY can supply you Q-XT 640 a complete, ready to go system 
with the following features: 


@ Original QL main 
board 128K : 
@ Sandy Super Q Board with: 


— 512K RAM 

— Centronics printer port 
— Super toolkit Il 

— Floppy disk controller 


@1 or 2 3.5” drives (1MB) 


@ Full travel keyboard 
IBM-AT style 
@ New internal 60 W 
switching power supply 
@ 3 Expansion slots 


£. 599 (1 drive system) 
£. 699 (2 drive system) 


The above can also be supplied in kit form, to upgrade your existing QL as follows: 
Box, keyboard and power supply (suitable for any disk controller, memory expansion card and 3.5” floppy disk 
drive), no soldering required, fitted in seconds. 


£. 259 


To usual range of SANDY quality products is also available. 


SUPERQBOARD 
CONTENTS 


FLOPPY DISK DRIVER 

RAM DISK DRIVER (UP TO 512 K) 
PARALLEL PRINTER PORT 
SUPERBASIC EXTENSIONS 


SOFTWARE DESIGNED BY TONY TEBBY 

(THE AUTHOR OF Q-DOS) CONTAINS 

THE FOLLOWING ADDITIONAL COMMANDS 
SPL SPL_USE - File spooler , 

JOBS AJOBS SPJOB RJOB - Job Control 

GET BGETPUT BPUT FPOS - Direct Access Files 
FLEN FTYP FDAT - File Enquiry Functions 

FOPEN FOP_IN FOP NEW FOP_OVER FOP_DIR 
VIEW - Examining a file 

WDIR.WSTAT WDEL WDEL_F - Wild Card Commands 
STAT “Drive Statistics 

WCOPY - Wild Card Copy 

RENAME TRUNCATE 

DATA_USE - Default Directory 

CLOCK - Resident Clock 

EXTRAS - Listing Extensions 

FLP_SEC-security level : 

FLP_START-start-up time 

FLP_TRACK-nr of tracks 


FLP_USE-microdrive emulation _ 
RAM_USE mdyv - microdrive emulation 
PAR_USE ser - serial emulation and many others... 


512K £. 249 
256K 5 £.214 
WITHOUT RAM £. 135 
UPGRADE O TO 256K £. 84 
UPGRADE O TO 512K £119 
UPGRADE 256 TO 512K £. 45 
THRU-CON RAM CARDS 


— THE ONLY RAM CARD WITH THRU CONNECTOR 


OF SUCH COMPACT DIMENSIONS: 72 x 100 mm. 
FITS COMPLETELY INSIDE QL 

— TWO VERSIONS - 256 K AND 512 K (YOUR QL MEMORY 
GROWS TO 384 K AND 640 K RESPECTIVELY). 

— 256K VERSION EASILY UPGRADEABLE TO 512 K 
IN SECONDS ! 

— D-RAM CHIPS FOR FAST ACCESS TIME (150 nS) 

— NO WAIT STATE OPERATION - UP TO 30% FASTER THAN 
OTHER MEMORY EXAPANSIONS 

— COMPATIBLE WITH ALMOST ALL MAKES OF FLOPPY DISK 
INTERFACE (PLS. INQUIRE) 

FLOPPY DISK INTERFACE COVER (FREE) 

- £.120 


FLOPPY DISK DRIVE _ 
TECHNICAL CHARACTERISTICS 


FLOPPY DISK: 3.5" HIGH QUALITY SLIM LINE TYPE 
MEMORY CAPACITY UNFORMATTED: 1000 KBytes 
MEMORY CAPACITY FORMATTED: 720 KBytes 
NUMBER OF TRACKS: 160 (2 x 80) 

AVERAGE ACCESS TIME: 86 ms inc. SETTLING TIME 
AVERAGE LATENCY TIME: 100 mS 

SETTLING TIME: 15 mS MAXIMUM. 

TRACK TO TRACK: 3 mS MAXIMUM 

MOTOR STARTING TIME: 250 mS MAXIMUM 


-ROTATION SPEED: 300 RPM 


TRACK DENSITY: 135 TPI 
RECORDING DENSITY: 8718 BITS per inch. 


INTERNAL POWER SUPPLY. 

Single £.125 

Double £. 200 

SPECIL OFFERS 5 
Super Q board 512K with double 3.5" drive 1MB ... £.449 
Rany disk'softwore:. 2 352 vac... «cna ssceeiae clte's ven £ 6.99 
QU mouserc. iccrass sone a Sb? 
Microdrive cartridges 10 pack .. £. 13.95. 
Datalife 3.5" disk DS DD 10 for .. 28 


TO ORDER PLEASE PHONE (0234) 219814 OR COMPLETE AND POST THIS COUPON 


| ENCLOSE CHEQUE/POSTAL ORDER FOR £ 


| POST TO: FARMINTEL Ltd., FARMINTEL LTD, 93 CHILTERN AVE. BEDFORD MK419EH PHONE (0234) 219814 E 
| 


512K 

256K - £. 80 

UPGRADE 256 TO 512K £. 40 
MADE PAYABLE TO FARMINTEL Ltd. 
NAME 
ADDRESS 


PRICES INCLUDE VAT, POST AND PACKING DESPATCH WITHIN 14 DAYS OR MONEY BACK 


QL is trade-mark of Sinclair research LTD. IBM-AT is trade-mark of IBM INC. 


TOMORROW 


(is nearer than you think) 


SANDY technology offers you this... 


HARDWARE 


MC68000 8 MHz MPU 

128 kbytes exchangeable system ROM 
512 kbytes to 8 Mbytes RAM 

two external ROMPer connectors 

two internal ROMPer connectors 
(ROMPer / RAM bus) 

complete bus connector 

QL compatible display controller 

two full duplex, independent baud 
rate serial ports 

MIDI output port 

QL compatible network throught port 
parallel port 

mouse port 

sound generator 

up to three 3%"' floppy disk drives or 
one 3%" hard disk drive and up to 
two floppy disk drives 

battery backed real time clock 
internal PSU 


KEYBOARD 


89 key IBM AT style keyboard 
CAPSLOCK LED 
joystick port 


im 


SOFTWARE 


QDOS compatible operating system 
extended window handling 

pull down and static menu handling 
integrated pointer environment 
improved error reporting 
SuperBASIC compatible programming 
language faster execution 

all Supertoolkit facilities 

Hot key / mouse driven interface 

file manager 

spooler 

job manager 


TONY TEBBY DESIGN 


Send a suggested name for this new machine and we will award a free computer 
to the FIRST best suggestion we receive. Don’t forget your name and address. 


Would you like to be the FIRST proud owner of this new amazing machine? 
Contact FARMINTEL for more details. 


FARMINTEL LTD, 93 CHILTERN AVE. BEDFORD MK419EH PHONE (0234) 219814 


MS CE 


Quality control for QL 


Major dealers, distributors and 
producers of QL peripherals and 
software have agreed to co-operate on 
a quality assurance scheme for QL 
products. 

The scheme would involve 
suppliers ensuring standards of 
qualilty, service and support for their 
products, which would carry a sticker 
to indicate participation in the 
scheme. 

The idea was suggested at a 
conference on the future of the QL 
hosted by Sinclair QL World and 
organised by Transform Ltd. More 
than 50 people attended the 
conference to determine the current 
level of support for the machine as 
well as to discuss plans for the future. 


Sideways 
printers 


Wenger Printers Ltd of High 
Wycombe, has joined forces with 
Dovetail Computers and has solved 
the principal weaknesses of the 
wide-carriage printer. With model 
type SDP4/1 that simply overcomes 
the problem by printing sideways. 

Features include 600cps print 
speed and letter quality performance 
at 130 cps. The colour graphics 
capability includes reproduction of the 
primary colours plus black, and 
combination tints are printed with a 
four-stripe ribbon. 

Further information from: 
Wenger Printers, 0296 624887 


Self support 
from Epson 


A technical support manual 
containing information and tips 
covering most Epson printers is now 
available from Epson dealers. 

The manual, written by the Epson 
technical services department, is full 


Sinclair/QL World August 1986 


Among those present were 
dealers, distributors, software houses 
and hardware manufacturers from the 
U.K., Europe and the United States. 

Virtually everyone spoke of their 
intention to continue support for the 
QL. Eidersoft and CST demonstrated 
Thor, the QL upgrade micro. Ken 
Browning of Eidersoft said that 
following an agreement between CST 
and Psion, the new micro would be 
bundled with the Psion exchange 
68000 version of Quill, Abacus, 
Archive and Easel. Thor will be 
launched officially at the PCW show 
in September. 

Carol and George Witham of A+ 
Computer Response, U.S. QL 
distributor, told the conference of the 


ae 


success of the QL in the States. A+ 
is providing full back-up and support 
services for American QLs which will 
shortly be re-packaged and sold with 
extra bundled software. 

Hellmuth Stuven of Dansoft, a man 
well-known for his unbounded 
enthusiasm for the QL, described the 
history of the machine and implored 
those involved with the post-Amstrad 
QL not to make the same mistakes 
as Sinclair. 

A number of software houses 
including Digital Precision, Pyramide 
and Talent announced plans for 
forthcoming new titles. Of the 
peripheral manufacturers, Sandy took 
the prize for the most vociferous 
endorsement of its products, and 
announced its intention to continue 
producing high-quality QL peripherals. 


of all the latest information normally 
available only by telephone from the 
Epson technical support. 

Appropriate sections can be 
bought separately and if additional 
hardware or software information is 
required, plenty of suggestions are at 
hand. 


The manual is in eight sections but 
for full information on some 
machines, both the original section 
and the section containing update 
information on the product will be 
useful. Prices range between £10 and 
£12 excluding VAT per section. 


Amstrad 
wrangle 
with CST 


Since the takeover of Sinclair, the 
future of the QL has been shrouded 
in mystery and speculation. With the 
recent announcement by CST ofits 
QL upgrade, Thor, matters have 

now become more confused. The 
weekly computer press has reported 
Amstrad as stating that the 
intellectual property rights bought 
from Sinclair include the QL and that 
CST will be producing the \Thor. 
illegally as it is based on the QL 
circuit board. 

At a meeting arranged by 
Transform and QL World concerning 
the future of the QL, David Oliver of 
CST explained that as his company 
was buying stocks of QLs and simply 
upgrading them-not marketing them 
as a new product — it was not 
infringing Amstrad copyrights. 

Following the Press reports we 
again contacted GST and a 
spokesman reiterated their previous 
statement, adding that he had heard 
none of the objections directly from 
Amstrad, despite numerous attempts 
to communicate with it. 

In view of Amstrad’s apparent 
reluctance to continue with the QL, it 
is difficult to understand the 
aggressive response to those who 
are. In any case, all the arguments 
may soon prove to be academic. A+ 
Computer Response, the U.S. 
distributor of the QL, has put ina bid 
bid which sources indicate has been 
well received. 

Should A+ acquire world-wide 
intellectual property rights to the QL, 
the company has stated that it would 
be more favourably inclined to 
products such as Thor. 


High speed 
plotter 


A 6 colour high-speed plotter for 
£899 is now available from Micro 
Peripherals. 

The high-resolution plotter has an 
accuracy of 0.025mm. with 56 
resident plotter commands. 

It is fitted with parallel and serial 
interfaces as standard and a choice 
of oil or water pens are available. 


Mastering machine code 
is not a Herculean task if 
you are properly equip- 
ped. James Lucy explains. 


or many people programming 

‘in machine code is the unat- 
tainable goal, an art mastered 
only by dedicated red-eyed 
insomniac keyboard hackers. 
It is ‘probably true that only a rare indi- 
vidual can mimic the action of the micro- 
processor in his mind so succesfully that 
he thinks like the machine and writes 
his thoughts in the form of a program, 
but we lesser mortals may still find utility 
in the arcane art. 

The subject of this article, and the one 
which follows, are the ideas and the 
tools needed by the tyro machine coder 
to help him along the path to enlighten- 
ment. A start can be made with nothing 
more than a good book — see panel — 
the QLand a good measure of persever- 
ance and patience, as will be shown 
later, and even the book will not be 
necessary if you wish to confine yourself 
to the program described in this article. 

Unless you have the dedication of a 
novitiate Zen monk, an assembler will 
be necessary, together with a monitor 

' — the software kind to reveal the inner 
workings of your program and to show 
you the error of your ways. This month 
the most popular assemblers are com- 
pared; monitors are reviewed for the 
next article. 

The easiest way to introduce the writ- 
ing of machine code programs is by 
means of an example. As will be seen, 
such ‘a program is a sequence of 
numbers in memory which together 
cause the M68008 microprocessor to 
execute operations on another area of 
memory or on data held internally in its 
registers. 

Two typical operations would be the 
movement of data from one memory 
location (address) to another, or the 
placing of a specified number in a regis- 
ter. Large quantities of these small build- 
ing blocks .can be put together to do 
something useful. Many of the most 
basic activities of the QL, such as fetch- 
ing input from the keyboard, writing to 


the screen and handling files could be 
written by the programmer, but this 
needlessly would duplicate the hercu- 
lean efforts of Tony Tebby, the designer 
of Qdos. 

Appropriate documentation — see 
book panel — lists the approved 
methods of gaining access to the Qdos 
routines, so a QL machine code 
program typically might consist of 
instructions handling memory and data 
registers directly, together with calls to 
Qdos for the difficult portions. So it is 
with the example, which happens to be 
a variation on the classic first program 
in the C language which writes ‘Hello 
World!’ to the screen. Here it is, in as- 
sembly mnemonic format — ignore the 
numbers on the left for the moment: 


ACKiNe 


The text part of the program, the 
mnemonics and their parameters, con- 


. Stitute an assembly language program 


in a form which -is supposedly 
comprehensible by humans. The 
hexadecimal numbers in the centre 
columns are the output from an assem- 
bler program which has converted the 
mnemonics into machine language, i.e., 

numbers. These numbers have been 
further converted to unsigned decimal 
in the leftmost two columns simply so 
that they can be placed into memory 
using the SuperBasic POKE_W com- 
mand. These will be of interest later. 
Although an assembler has been used 
in this case, it would have been possible 
to calculate the codes manually by refer- 
ence to some of the books listed in the. 


M ; 
acro assembler. For serious software developers 


panel — for example the mnemonic RTS 
is always coded as the box number 
4E75. 

The action of the example program 
is as follows: 

1. Put the address of the message 

in register A1 

2. Set register AO to zero by sub- 

tracting it from itself 

3. Place the contents of memory lo- 

cation $DO in register A2. Regardless 

of the version of the ROM, $D0 will 
always contain, or ‘point to’ the 

routine we want, which writes a 

message to the screen 

4. Jump to the subroutine whose ad- 

dress is in register A2. 

5. Go back to the.caller, in this case 

SuperBasic 

There now follows the data to be used 

in the program: 

6. Put 16, the number of characters 

inthe message in a word of memory 

7. Put the bytes representing the 

ASCIl values of the characters of the 

message into consecutive myles -sized 

locations. 

As can be seen, the program places 
some values in the microprocessor re- 
gisters, reads a value from the ROM, 
and then executes a Qdos vectored 
routine — all in all a typical QL machine 
code program. The final problem is in 
getting the program into memory and 
running it. An assembler would generate 
a file containing the codes which could 
be loaded into memory using the Super- 
Basic LBYTES or possibly EXEC com- 
mands, but at the moment we have only 
decimal conversion of the program 
codes. The following short SuperBasic 
program reserves some memory and 
allows the decimal numbers to be en- 
tered: 

1. a=RESPR(512) : c=a 

2. REPeat loop 

3. INPUT#O0, ‘number?’ : b 
4. IF b=-1 THEN EXIT loop 
“5. POKE_W a,b : a=a+2 

6. END REP loop 

7. REPeat loop2 : CALL c 


Save this. program before you run it, 
when a prompt for a number will be 
displayed in channel 0. Enter all the de- 
cimal numbers in turn, pressing ENTER 
after each. When all the numbers have 
been entered, make sure any Microdrive 
cartridges have been removed, then 
enter -1. You have just produced your 
first machine code program. 

Flushed with success, we can now 
look briefly at the various alternative 
methods of running machine code 
routines. One way is the foregoing idea, 
loading the code into resident proce- 
dure space and then CAL Ling it. Perusal 
of the keyword section of the QL User 


Guide will show that CALL can be fol- - 


lowed by parameters which set the 
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values of most of the registers on entry 
to the routine, so the same code can 


- produce a number of results if required. 


It would also be possible to link the 
routine to the SuperBasic interpreter, 
perhaps under the keyword name 
‘HELLO’, and in that case each time 
‘HELLO’ was used in a SuperBasic pro- 
gram the message would be displayed 
in Channel O or 1. 

The method of adding to the Super- 
Basic vocabulary is not difficult and is 
explained in a number of the recom- 
mended books. The third, and poten- 
tially most interesting option, is to run 
the code as a job, using the SuperBasic 
EXEC command. Because more than 
one job can run at once, several copies 
of the program could be in action 
simultaneously. 

The problem with the present code 
as ajob is that it ends with the instruction 
RTS, which implies it has been called 
as a subroutine by another program, in 
this case the SuperBasic interpreter — 
analogous to old-fashioned Basic 
GOSUB and RETURN. If the code is to 
be run as a job it will be executing in its 
own right and should not end with RTS. 


A solution is to form a loop, replacing 
the RTS instruction (Qpcode 4E75) by 
an instruction which means, broadly 
speaking, ‘branch to the instruction 14 
bytes before where.| am now’. The op- 
code for that happens to be 60F2 or 
24818 in decimal. 


So if you run the SuperBasic program 
again, having changed line 7 to read 
SEXEC mdv2_ hellow,c,32,512, and 
when entering. the opcodes you type 
the opcode of the branch instruction 
(24818) instead of that for RTS (20085), 
the result will be an executable file on 
mdv2 called ‘hello’. 


The keyword SEXEC is detailed in the 
QL User Guide. The program can be 
run by typing ‘EXEC mdv2_hello’ and 
will multi-task with the SuperBasic in- 
terpreter, although you will soon get 
tired of messages being inserted into 
your every command line. 


You will need to read Andrew Pen- 
nell’s book on Qdos to find why the 
running of multiple copies of this program 
does not produce the expected result, 
and why CTRL — £5 fails to freeze the 
screen. The easiest way of getting rid 
of the program is to re-set the QL. 


By now, you should have a good idea 
of what a machine code program is and 
how it is loaded and run. The way you 
translate your ideas into an assembly 
language program will have to be left to 
one of the recommended books but a 
topic you will not find covered is the 
choice of an assembler. 

An assembler is a program which ac- 
cepts a number of assembly language 


‘instructions as its source and produces, 


either in memory or in a file, sequences 
of numbers which constitute machine 
code programs. It may also produce 
various listings containing information 
useful to the programmer. As has been 
shown, it is possible to translate your 
assembly language into the corres- 
ponding machine code numbers by 
hand, using information supplied by the 
manufacturer of the microprocessor; 
the assembler does it much faster and 
more reliably. 

The Catch-22 situation with most 
software purchases applies strongly to 
assemblers; you are not sure what you 
need from the program until you have 
bought one and, perhaps, discovered 
its limitations. Accordingly, in the follow- 
ing paragraphs we explain the terms of 
reference used in the assembler 
comparison panels, together with some 
other points to consider if you are think- 
ing about buying an assembler not in- 
cluded. The notes should help you de- 
cide which factors are important to you 
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Continued from page 9 


and worth paying for and which are not. 
In some cases the extra features must 
be paid for in memory requirement, 
loading time and convenience as well 
as in money. 

Editor: All assemblers are provided, 
usually as a separate program, with a 
text editor, which is a simple word pro- 
cessor used to prepare the assembly 
language-source code. Editors vary in 
their convenience, speed, compact- 
ness and philosophy. 

Some adopt the menu-driven ap- 
proach, which is good for. people with 
bad memories or for poor typists, and 
some use direct commands which can 
be very convenient and fast for the ex- 
perienced user. 

The choice of editors is not so great 
as it might appear, since the GST as- 
semblers are supplied with the excellent 
Metacomco editor and the Assembler 
Workbench editor supports a subset of 
the most useful Metacomco editor 
commands. The Talent version is also 
interesting, in that it is implemented as a 
SuperBasic extension, is re-entrant so 
that several files can be open to one 
copy of the editor, and it sets up a device 
like mdv1_, with the same name as the 
file, e.g., mdv1_filename. 

The file then appears to be a RAM 
file which greatly speeds filing opera- 
tions and in this form is also very useful 
for SuperBasic program editing. It is 
possible to produce source files with 
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Quill if you so wish, although the finished 
product must be printed to a file, rather 
than using the Quill ‘save’. 

Motorola standard: Since the 
dialect of assembly language used by 
the QL is determined by its Motorola 
microprocessor, it follows that confor- 
mity with the Motorola standard is desir- 
able. All the assemblers considered 
conform either closely or completely 
and in assembling source intended for 
one assembler with another, more diffi- 
culty will be experienced with differing 
assembler directives than with 
divergence from the Motorola standard. 

Assembler directives: They are in- 
structions to the assembler to control 
its action. In general, they do not pro- 
duce any machine code but since they 
are included in the source file, differing 
directives can cause confusion when 
typing-in magazine listings. 

Directives control such matters as 


macros, listing formats, conditional as- 
sembly and other features. 

Listing control: An assembler list- 
ing is a file or printout containing the 
source assembly language instructions, 
the corresponding hex machine code 
and the address of each instruction re- 
lative to the start of the program. In ad- 
dition, a symbol table may be produced 
which will list the values of the various 
symbols used in the program. 

For most users no special format is 
required but you may require listings in 
a neat form with definable page widths 


_ and lengths. 


Macros: Macros tend to be a feature 


of the more expensive assemblers. Put 
simply, they allow sequences of in- 
structions which are used frequently in 
a program, such as calls to Qdos, to be 
assigned a name (a macro) which is 
used in the source code instead of the 
instructions. 

As with a SuperBasic procedure, 
parameters may be passed which can 
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Assembler Workbench. A winner from Talent — but no manual. 
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alter the action of the macro. Used in 
conjunction with conditional assembly 
controls, a good macro implementation 
almost constitutes a programming 
language in its own right and can shor- 
ten source code considerably. 

Beginners may feel they have suffi- 
cient difficulty learning assembly 
language without learning a further as- 
sembler control language to help them 
write it. The GST macro assembler has 
a very good provision for macros and 
includes a macro library on the car- 
tridge. 

Linker: You may wish to write your 
code as a series of blocks, assembling 
each as you go, or you may want to join 
sections of machine code to code pro- 
duced by high-level language compilers 
such as C. Some programmers have 
libraries of ready-assembled routines. 
Provided the assembler is capable of 
generating code in the standard Sinclair 
Relocatable Object File Format, or a for- 
mat specific to itself, a linker will join 
individual blocks and produce an 
executable program. 

The Metacomco linker is restricted to 
code produced by the assembler; the 
Assembler Workbench and GST QL 
Assembler do not have linkers but allow 
previously-assembled code to be 
included by a rather roundabout 
method. The GST macro assembler has 
an excellent and comprehensive linker. 

Error reporting: A variety of 
techniques are used to recognise errors 
in the source code and to report them. 
The user needs clear, accurate and con- 
cise error messages and it is regrettable 
if one error causes subsequent perfectly 
valid statements to be reported as 
errors. 

The Computer One assembler has a 


neat system of creating an errors file 
with the same name as the source but 
with the extension_err. That is loaded 

That is loaded preferentially by the 
editor and contains the original source 
with all errors highlighted. When they 
have been rectified the original file can 
be over-written with the corrected ver- 
sion. 

Turn-round time: For the beginner, 
this is probably the most important 
consideration. It reflects the time taken 
to load a small file, edit it and save if 
necessary, assemble it, and then re- 
load it into the editor to correct errors. 
The Assembler Workbench has some 
very clever ideas in this department and 
works quickly. 

The Computer One assembler/editor 
combination is also very fast, as is the 
well-integrated DevpacQL. The large 
files and overlays used by Metacomco, 
and the fact that the editor and assem- 
bler cannot co-reside in an unexpanded 
machine, mean that it seems very slow. 
On the other hand, most Metacomco 
users will probably have expanded 
memory and/or discs, in which case no 
difficulty arises. 


Continued on page 13 
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QL GAMES 


BYTEBACK 


ADVENTURES 
Be srage steam cc totvnss MeN EERE d Se ca Sn Mortville Manor ............ 
e : Aquanaut 471 
Dragonhold 


hag ee. BAB Wanderer . 
Othello 3D 


"£18.00 LANGUAGES 
£11.00 Superforth ........ccceeee 
£ 9.00 Assembler Workb: 


(We 
BJ in 3D Land Metacomco Assembler . £35.00 
Spook ...... Metacomco C £85. 
Knight Fl Metacomco Lisp 


Metacomco BCPI . 
Metacomco Pascal ....... £75.00 


BARON ROUGE 
Are you really an ace? Sure? Prove it! : . . No abstract aliens, but 


airplanes, balloons, birds and other strange or absurd things flying Snooker ... 


i Scrabble BUSINESS 

Ine SS oe Flight Simulator .. Integrated Accounts ..... £78.00 
The aim of the game is to become the General. Very funny! 20 levels, Lands of Havoc .. Project Planner ........... £34.00 
machine code, compatible joystick. Citadel .......... Entrepreneur .... 


Home Finance ............. 
Cash Trader... 
ASEMIVEY cos eceessnencseeeosv sree 


Quickshot II Joystick ............ £8.00 Miracle Expanderam 256 ................ 
Joystick Adaptor £4.50 Miracle Expanderam 512 ................ 
Transform BOX ou... £4.50 Miracle Centronics Interface ........... £ 19.00 
4 Microdrive Cartridges ........ £7.00 20 Microdrives + Transform Box ... £ 39.00 


Zapper and Eagle 


GWENDOLINE 

is the name of your fiancee, captive in a dungeon of the haunted 
castle. You, the hero, try to discover her; find the keys, eat ham, 
apples . . . (You are human, no?) and run! Beware of the bottles of 
wine! And what happens when you reach GWENDOLINE? See your- 
self . . . 38 screens. Very nice graphics, machine code, compatible 
joystick. 


SAVE £5.00 — Gwendoline with Baron Rouge £30 only 
(Price incl. p&p and English instructions) 


Available by Mail Order. How to order — send your address and (1) 
An Eurocheque to LABOCHROME or (2) Transfer money to Account 
No. 000-0146480-10 to LABOCHROME, LIEGE, BELGIUM or (3) An 
order to the address below; we will send the package with post cash 
on delivery (8 days delay — p&p excl.) or (4) by Visa. Outside Europe, 
add £1.00 per game. 


LABOCHROME, 173 Rue de Fragnee, B*4000 Liege (Belgium) 
Welcome trade enquiries 


*** WRITE OR PHONE FOR NEW CATALOGUE *** 


ALL PRICES INCLUDE VAT AND FIRST CLASS POST 
TELEPHONE (0636) 79097 FOR PERSONAL ASSISTANCE 
Send Cheque/PO to: 


BYTEBACK 22 SPRING GARDENS, 


NEWARK, NOTTSNG24 4UW 


MICRODRIVE COPYCAT 


Make copies of those protected programs. 
Will backup most software 


Additional 256K £79, 512K 
Additional 3.5” disc drive 


UNDISTORTED SCREEN DUMPS 


“1 to 1 Dump” enables you to get true hard copy 
of your screen images 


RUN THOSE AWKWARD PROGS pamccoiaias RRP £299 


WITH... =, : 
Boot 128K. Fools your expanded Ql into thinking 12" high resolution colour monitor 
it has only 128K RAM. Easy to USC. ssessssssssssssesssen £4.99 | complete with QL cable and 12 month warranty 


READ AND WRITE MICRODRIVE\/ ASTRACOM __ 1000 Modem £198 
SECTORS... Auto answer/dial modem with QL software. 


300, 1200, 1200/75, 75/1200. Call for data sheet. 


with extensions to SuperBasic 


or 1000 lines of assembly source code 
57 REPTON DRIVE 


ay Eee ee Seae me £221 NAN AN WAAL CREWE CW" =f 


apie (0270) 582301 
Cumana disc interface 
512K Expanderam (works with Cumana I/F) PRICES INCLUDE VAT AND DELIVERY 


Super Qboard disc & printer I/F & 256K RAM EXPORT ORDERS WELCOME: WRITE FOR TERMS 
Super Qboard with 512K RAM 
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Documentation: Good documenta- 
tion is the vital final link in the chain from 
the software author to the user and the 
user’s perception of the product is influ- 
enced heavily by the documentation 
provided. The Assembler Workbench 
includes a clever on-line user guide but 
provides no hard copy except a card 
offering the manual in Quill format — for 
more money of course. — 

The main help file may be copied to 
a printer, assuming you have one and 
that you are prepared to tolerate format- 
ting marks. That is not acceptable, 
particularly if, like me, you read software 
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HiSoft DevpacQL 
Assembler/Debugger 
For the Sinclair QL 


HISOFT 
High Quality 
Microcomputer 
Software 


documentation in the bath. The smaller 
GST manual is for people with good 
eyesight and is not above using a whole 
page rigorously defining the syntactic 
token of a [number] in a particularly 
impenetrable way. 

HiSoft crushes documentation of a 


macro assembler and editor into 30 


laser-written pages which surprisingly 
prove to be reasonably accessible. Un- 
like any of the others, it provides a 
Motorola programmers’ pocket guide. 
@ Next month, James Lucy will look at 
the various monitors available for the 
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Open Channel is 
where you have the 
opportunity to voice 
your opinions in 
Sinclair QL World. 
Whether you want 
to ask for help witha 
technical problem, 
provide somebody 


Soccer software 


I wonder if you or any of your 
readers could assist us to obtain 
a program which would enable 
us to computerise our league 
tables? We operate one of the 
biggest boys’ football leagues in 
the country, some 110 teams 
split into nine age groups, and 
a program to formulate them 
would be a big advantage. 

So far as Iam aware there is 
no commercial package 
available but if you or your 
readers know otherwise we 
would be very interested. 

R. Darley, 
200 Perran Close, 
Bransholme, Hull. 


ROM required 


The recent acquisition by 
Amstrad of the Sinclair rights 
prompts me to write concerning 
a problem which probably 
affects many other QL users. 

I have a JM-ROM D12- 
hardware QL purchased some 
seven months ago and like the 
machine more as I use it. Like 
many others, I am sure, I have 
realised that we would greatly 
appreciate the SuperBasic 
improvements offered by the 
later JS-ROM. I am thinking 
particularly of the WHEN 
ERROR construct. My QL will 
parse the line correctly but that 
is as far as it goes, since it 
produces a variety of errors on 
trying to use it. 

Can you advise me on the 
possibility of obtaining an 
updated ROM? Iam told that JM- 
ROM QLs “won't recognise” 
more than one add-on external 
hardware device. Of what 
practical significance is this to 
someone who plans only one 
disc drive plus a printer? 

Thank you for an excellent 
magazine — keep it up. 

Paul Newman, 
Leiston, Suffolk. 


Now that it has been intimated 
in the press that the QL is no 
longer being manufactured, 
what serious advice would you 
give to a professional user who 
has invested nearly £1,000 so 
far and has been contemplating 
the additional costs of disc 
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with the answer, or 
justsound offabout 
something which 
bothers you, 
write to: 
Open Channel 
Sinclair QL 
Petty France 
London SW1H 9ED 


drives, additional memory, and 
so on, and others in a similar 
position? 
R.W.C., 
Holland Park, 
London. 


Editors reply: Judging by the 
commitment given by dealers, 
hardware manufacturers and 
software houses to continue 
support for the OL (see OL 
Scene), our advice would be to 
go ahead. 

You have already made a 
substantial investment and it 
ts no less likely that you will 
receive continued back-up 
and support for new 
peripherals. 


Where to get Psion 


Have you any information 
regarding the support for QLs 
now that Amstrad has taken 
over? I sent an order on April 
18 for version 2.3 of the four 
QL programs to Camberley, as 
printed in QL World, and have 
just received back my cheque 
with a printed apology from 
Cambridge. 
Is anyone likely to take over 
the distribution of 2.3? 
WJ. Wilson, 
Botley, 
Southampton. 


Editor's reply: The latest 
versions of the programs — 
Quill, Abacus and Easel V2. 35, 
Archive V2.36 — are available 
from Psion priced at £9 each. 
The address is: Psion House, 
Harcourt Street, London W1. 


Pounds of printer 


For all those who bought the 
offer pack of QL plus 8056 
printer from Dixons and have 
had difficulty getting the 
printer to accept underlining, 
here is the way to do it. 
According to the manual, 
underline is switched on by the 
command “ESC — 1’ and off by 
‘ESC —0' but when those codes 
are entered into the printer 
driver they generate a peculiar 
symbolat the start and finish of 
the underlining. The ‘correct 
codes which work are 
underline on ‘ESC, ”—SOH’ and 
underline off ‘ESC,” —,NUL’. 


The other problem I found 
was getting the printer to print 
the pound sign. That is done 
very easily by entering at the 
TRANSLATE 1 position ‘96,156’. 

I hope this information will 
be of use to other QL and serial 
8056 users. 

G.M. Harrison, 
Chatham, Kent. 


Curious cartridges 


I would like to draw attention 
to a curious circumstance 
concerning Microdrive 
cartridges. As you know, a new 
cartridge should be formatted 
before use. I bought from a 
local specialist computer shop 
six new cartridges in their 
sealed bubble-packs and, out of 
curiosity, did a DIR command 
before formatting. To my 
surprise I found that five ofthe 
cartridges were already 
QL-formatted and had been 
given names. 

The names of four were dates 
of the form 7/8/85, although it 
is not immediately obvious to 
me how one FORMATs a 
cartridge with a name 
incorporating the slash 
character and the four 
cartridges were otherwise 
empty of data or programs. The 
fifth cartridge had been given 
the name “TEACH2” and 
contains three program files — 
backup, teach6, teach7. 

On investigation, it appears 
that “teach6”, a lengthy 
SuperBasic program, is an 
interesting and detailed tutorial 
intended to be used with a 
textbook or course on Risk 
Profile Analysis. Ifyou use it you 
will find it necessary to press “r” 
and “p” simultaneously to get 
past the opening screen, and “I” 
to proceed beyond the 
subsequent examples. 

Ata later stage “teach6” gives 
the user the option of calling-up 
a non-existent menu from 
mdyv1; “teach7”, although listed 


“in the directory, is apparently 


non-existent, “backup” is 
intended to back-up not only 
itselfand the other two files but 
also “teach8” and “teach9” 
which are not on the cartridge. 
Two points come to mind. 

Some “new” Microdrive 
cartridges are certainly not 
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pristine and unformatted. More 
important, there is the 
possibility that confidential or 
commercially-sensitive 
programs or data are 
inadvertently being released to 
the public in this manner. 
Trevor Jennings, 
Ashton, Bristol. 


Bad flight? 


I am very surprised at the 
ecstatic response with which QZ 
Flight by Microdeal has been 
met from your magazine and 
reviewers since its release. Are 
you aware that this program was 
first released for the Dragon 32 
and Tandy colour computer in 
the Winter of 1984 under the 
name Worlds of Flight? All 
reviews and screen shots reveal 
that the program has been 
converted to the QL with only 
some extra colour having been 
added. The Dragon version had 
the same nine worlds, screen 
layout and wire graphics as is 
now on the QL version and sold 
for £7.95 as opposed to the QL 
price of £19.95. 

Although the Dragon was an 
excellent machine in its time, 
consider the differences 
between the two computers. 
The Dragon had about 25K 
available to the programmer, 
the QL more than 90K. The 
Dragon’s processor was the 
Motorola 6809 running at less 
than 1MHz. The QL uses the 
68008, the 6809's big brother, 
and runs at 7.5MHz. The graphic 
resolution of the Dragon was 
256 x 192 pixels as opposed to 
the QL’s 512 x 256 pixels. 

Given those big differences 
and the program's heritage, I 
find it sickening to find this 
simulator being voted the most 
innovative new QL product in 
the Sinclair QL World awards. 
It may be the best we have but 
it is not great by any means. Just 
consider the excellent range of 
flight simulators available for 
the 48K Spectrum and 
Commodore 64. Why should 
we be happy with this pathetic 
offering when we own 
machines with vastly superior 
processing power and memory 
systems? 

A. Wond, 
Leuchars, Fife. 
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I am trying to learn assembly 
language on the QL but I am 
finding it frustratingly difficult 
to finda good piece of literature 
on the subject suitable for the 
absolute beginner. I have in my 
possession the Metacomco 
Assembler, Tony Tebby’s new 
monitor QMON II, OL 
Advanced User Gitide by Adrian 
Dickens, and 6800 Assembly 
Language Programming by 
Kane, Hawkins and Laventhal 
but what I need is a book which 
will tell me, as simply as 
possible, how the Motorola 
68008 works and how to 
program it in assembly 
language, thus stringing 
together the information. 

So far I have been 
recommended by Tebby OZ 
Assembly Language 
Programming by Colin Opie as 
a good book, despite bad press 
reviews, for a simple 
explanation of the Motorola 
68008. Please could you advise 
me on the subject? 

John Bainbridge, 
Faversham, Kent. 


Editor's reply: Just turn to our 
Machine Code feature starting 
on page 8 where you will find 
advice. 


Immortal BJ 


While I was looking through the 
code of BJ The Return, using 
QJUMP Qmon monitor, I 
discovered a way of getting 
infinite lives. Any readers who 
want to be immortal should 
type in the following program: 
100 PAPER 0 

110 INK 6 

120 CLS 

130 CSIZE 3, 1 

140 AT 4,1 

150 PRINT “BJ, The Return, 
is loading”. 

160 CLOSE #1:CLOSE 
#2:CLOSE #0 

170 LBYTES mdv1_CDS, 
200000 

180 EXEC_W mdv1i_PRc 
190 D=PEEK_L (163872) 
200 E=RESPR (D-189574) 
210 LBYTES mdv1_CD, 
189574 

220 POKE=W 199450, 
16890 

230 CALL 189574 
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then RUN it with a copy of BJ 
The Return in mdv1_. Enter the 
security codes as usual and 
when it has loaded you will 
have infinite lives. 
Peter Dampier, 
Brighton, Sussex. 


Accentuated Quill 


Having slaved away putting all 
the accents into a 3,000-word 
article in French, I found to my 
horror that my printer, a 
Centronics GLP, uses a 
completely different code for 
accented letters. I shall have to 
send my publisher a copy with 
the accents added by hand, or 
ask my wife to produce it on her 
typewriter. She is a French 
touch-typist and refuses to 
touch Quill until it can offer her 
an AZERTY kevboard. 
Philip Stewart, 

Boars Hill, Oxford. 
Editor’s reply: If you can 
discover which code the GLP 
uses for the accents you 
require the translate 
command in the printer driver 
can be used to make the 
alteration. 


It was good to receive my June 
Sinclair QL World and to find 
some sympathy in an article 
describing the loss of files due 
0 “I/O incomplete” or “invalid 
Quill file” types of error 
messages. 

With my JM VER$ QL, I have 
not been able to save any 
documents longer than about 
5,050 words or 64 sectors. In 
your Open Channel was a letter 
from Ian Tait suggesting that he 
could store files on Microdrive 
up to 10,000 words in length. I 
am asking how that is so, in the 
light of my system’s limitation. 
Could someone please explain 
how he can reach that great 
length? 

Incidentally, I have a PCML 
256K memory add-on and have 
never had any real problem 
with my system. I am interested 
in any information or letters 
from anyone knowing a little 
more about this “cute” kind of 
storage system. 

Rois Harder #15, 
P O Box 491, Yanbu, 
K. of Saudi Arabia. 


Magnetise your 
Microdrives 


have possessed a QL from its 
fe — give or take a few 
months — and find it an 
excellent machine but I had 
accumulated several corrupted 
Microdrives which the 
computer refused to 
acknowledge existed. After 
persistent attempts to re-format 
the cartridges, always met with 
the response ‘not found’, I was 
about to give up in despair. 
Having dissected one cartridge, 
with great pleasure, I hit on the 
significance of the phrase 
magnetic medium and decided 
to try a magnet on the offending 
Microdrives — and it worked. 

I rubbed the magnet on the 
piece of exposed tape and after 
two or three tries, presumably 
to find the correct area of tape, 
the Microdrive gave in and was 
formatted. Is the humble 
magnet the answer to all our 
Microdrive problems? 

George Coutts, 
Fleet, Hampshire. 


Hardware headache 


Tam a Belgian reader of your 
magazine for which I 
congratulate you. I am the 
owner of two Sinclair QLs — a 
JM and a JS — fitted with Sandy 
512K RAM-board and CST disc 
interface plus twin 3.5in. drives 
from the same. This system 
alone worked perfectly until I 
purchased a Toolkit II EPROM 
from Care Electronics and 
wanted to fit it into the QLROM 
port. 

On power-up, the CST logo 
appears on screen then the Care 
Toolkit one and finally the 
normal F1/F2 choice. Until 
there, everything is satisfactory. 
The problems arise when I try 
to use the additional commands 
like WCOPY. That causes the 
dise or Microdrive accessed to 
run and whirr for ever and 
locks-up the QL until general 
RESET. The same kind of 
phenomenon appears when 
using the ICE EPROM from 
Eidersoft in its back-up 
command. 

None of the problems is 
present when the QL is used 
with only one interface — CST 
or Sandy — and the EPROM. It 


occurs only when the two 
interfaces are in place together 
with the EPROM, on JS as well 
as on JM. 

Tread the manual of each one 
of the devices carefully to find 
an explanation to the troubles 
but no answer could be found. 
I also tried the TK2_EXT 
command from Toolkit IL to 
make sure the new commands 
were linked correctly but once 
again with no result. 

Tam now thinking about 
replacing the combination of 
CST and Sandy cards with a 
single new Sandy SuperQboard 
which houses both disc 
interface and half-megabyte 
RAM but can it be a solution? 

That is why I decided to write 
hoping vou can help me find 
how to use my complete 
system. If not, you can always 
copy my paper in your 
magazine for your readers to be 
informed about the troubles 
they could encounter in sucha 
hardware situation. 

Pierre Cornez, 
Hyon, Belgium. 


Amstrad aggravation 


Ibought my QL last November. 
Each time I switched on the 
machine, it seemed to take 
longer for the colour to appear. 
Now finally the colour has failed 
altogether. In view of the recent 
Amstrad takeover I enquired at 
Wigfalls what the procedure is 
to have the machine repaired 
under warranty. 

The manager investigated 
and reported to me that 
Amstrad has not yet set up any 
maintainance facilities for 
Sinclair products and that any 
goods returned on warranty for 
repair products and that any 
goods returned on warranty for 
repair would be “frozen” until 
such time as it is prepared to 
effect the necessary set-up. 

Obviously, Lam not very 
eager to lose my QL for an 
indefinite period. On the other 
hand, lam concerned about the 
remaining warranty time. 

I dread the prospect of losing 
it for any length of time. If you 
could advise me as to my best 
course, I would be grateful. 

P. Kidson, 
Smethwick, 
West Midlands. 
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he battle of the ROMs is over; 
the final tally is three working 
but uncompleted versions of 
the QL operating system. 
While for most of us that will 
have little or no practical meaning, seri- 
ous programmers have long since 
discovered that Qdos does not yet offer 
all the necessary features of an 
advanced working environment 
expected of a machine with the proces- 
sing power of the QL. 
Recognising the genuine need for 
correcting the omissions to the existing 
f Qdos versions, Tony Tebby wrote a col- 
lection of procedures and functions 
which was offered originally to SRL al- 


f most two years ago for inclusion in 
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eventual upgrades of the QL ROM. 
Superseded versions of the JS ROM 


which should have appeared in the first. 


quarter of 1985, in common with many 
of the other good ideas surrounding 
evolution of the QL, failed to materialise. 
Rather than letting the concept of the 
improvements formulated for the QL 
slide into oblivion, QL-Toolkit was made 
available initially on Microdrive. 

Although the early Toolkit was 
extremely difficult to obtain, its main dis- 
advantage was that, available only on 
Microdrive, its use reduced the amount 
of available RAM. Tebby’s new Toolkit Il, 
presented. as a 16K plug-in ROM 
cartridge, is marketed in the U.K. by 
Care Electronics. Incorporating many 
new procedures and functions, this 
powerful tool has been revised and 
enlarged to the extent of being almost 
entirely re-written. 

Supporting and clarifying the QL 
command structure, the extensions 
offered by Toolkit Il provide a range of 
facilities which, in many ways, simplify 
operation and may be grouped into sev- 
eral broad categories. 

File editing. The main shortcoming 
of the QL editing facility is the restriction 
of having only a line editor. Also dedi- 
cated programs, such as_ screen 
editors, have been required to view and 
edit text files. 

The Toolkit Il’s new command, ED, 
permits direct screen editing in a listing 
while VIEW provides a facility for the 
viewing of text files. While in the ED 
mode, listings are indented from their 
line numbers and lines being edited are 
highlighted. Successive line numbers 
are generated automatically which are 
halfway, where possible, between exist- 
ing line numbers. 

wsdeditie 
yas: 
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Copying files with wildcard names 
such as wcopy_fred, illustrating only 
one possible permutation, will provide 
the option of copying all files containing 
the name fred from the default device, 
which can be re-defined by the DATA 
USE command to another default 
device, which can also be re-defined. 

Initially, the first file name is sent to 
the screen, followed by Y/N/A/Q, from 
which it is possible to set the system 
so that it will perform the required action 
on it, to skip a particular file, perform 
the required action on all similar files or 


to quit the command. The latest version 


of Toolkit Il offers the facility of support- 
ing the system break after initiating a W 


Providing two modes of operation, ED4 command. 


may be used in either insert mode, 
where additions are made to a line, 
pushing along existing characters, or in 
over-write mode, where successive 
characters are deleted. In common with 
all good editors, a range of keys is avail- 
able for screen and text management. 
Three drive extensions have been 
added to the operating system — 
RENAME, TRUNCATE and FLUSH. 

File maintainance. Since file 
systems are of major importance to any 
computer system, many Toolkit Il com- 
mands tend to concentrate on methods 
which improve file-handling and, at the 
same time, extend the range of filing 
procedures available to the user. 

A number of commands have been 
added to the existing DIR, COPY and 
DELETE facilities which increase the 
versatility of the QL manipulation of files. 
Some of the most notably the wildcard 
commands, extract file information in an 
organised manner and can be applied 
to directories, copying, spooling and re- 
naming. 


Any of the commands beginning with 
w may be used almost interchangeably 
with the original commands but the 
additional command power becomes 


evident when particular files are 
selected by parts of their names. When 
listed, directories, for example, will 
include all the files containing similar 
character combinations. 


—— | 


ee of a file respectively. 


Additional commands to copy struc- 
turing include COPY_O and COPY_H 
which provide the facility for copying 
over existing files and copying a pure 
byte serial link so that the communica- 


The_OVER commands, incidentally, 
are particularly useful for updating file 
information continually during program 
development as well as saving. New 
OPEN and CLOSE commands have 
been added to the range of keywords 
for improved file-handling which differ 
from the standard commands in two 
ways. If a file error, such as ‘not found’ 
occurs, the new functions will return the 
error code and continue and those func- 
tions may be used to find a vacant hole 
in the channel table; if successful, it will 
return the channel number. 

Directory control. Expecting to 
operate in a multi-device environment — 
i.e., mdv1 and 2/flo1 and 2 —in addition 
to the WDIR facilities, Toolkit Il supports 
the additional commands of DATA_ 
USE, PROG_USE, DEST_USE which 
set the defaults from and to which in- 
formation flows. Devices are defined as 
any legitimate QL device such as flp, 
mdv, ser and so on. 

The DLIST command will return a list- 
ing of the _USE defaults or assign- 
ments. In common with the standard 
DIR command, which is supported for 
compatibility, directory listings may be 
sent to any open channel. 
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Run-time commands. Toolkit || re- 
defines and extends file loading and 
saving operations so that default direc- 
tories are used. That means that if the 
DATA_USE device is may, it is neces- 
sary only to type Irun name and the file 
will be obtained from mdv1_. In addition 
to LRUN, LRESPR is available for load- 
ing a file into a resident procedure area 
and calling it. 

The input of EXEC and EXEC_W has 
been shortened, to EX and EW respec- 
tively, but may be used interchangeably. 
An additional command, ET, has been 
added which will set up a program and 
return control to SuperBasic so that a 
debugger can be called to trace its 
execution. 

Keywords, related to the various 
aspects of the job flow, have been 
included in the new operating system 
which can provide a list of all jobs 
Currently running, find or set priorities, l 
suspend or remove jobs. I 


! 


Miscellanea. Many other procedures 
and functions included in the Toolkit II 
repertoire extend the usefulness of the 
QL; some of them, like the Network 
driver, raise many of the rudimentary 
and largely unfinished features of the QL 
network facility to a useful level. Toolkit ’ 
ll documentation, however, points out 
one rather sad fact — a significant 
number of pre-D14 QLs have Network 
hardware which does not work at all. 

For those fortunate enough to have 
a working Network system, Toolkit I 
incorporates an extended file server 
which includes serial device (printer) 
serving, as well as QLto QL messaging. 

The NFS_USE command has been 
altered to give more flexibility whereby, 
as just one example, several users may 
share a data disc when using Quill, 
Archive or any other similar program. 
Other utilities include the inevitable clock 
facility, which is available on-screen by 
using the CLOCK keyword. More useful 
is the facility for an alarm/reminder, 
initiated by ALARM, followed by the 
hour and minutes required. 

Error-handling, initiated with the 
largely unfinished code contained in the 
JS and MG ROMs has, as far as pos- 
sible, been implemented. If anyone has 
compiled documentation regarding the 
JS error traps, i.e., ERR NC, and so on 
| would appreciate receiving a copy. 
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Two powerful extensions have been 
included in the latest version of Toolkit Il: 
<ALT>&<ENTER> will get back the 
last line typed (to #0), and it is now 
possible to assign character strings to 
various keys by the use of ALTKEY and 
<key>, followed by the _ string 
command. 

There are two commands which will 
force a return to the turn-on windowing 
WTV and WMON. Other display con- 
trols include commands to enable or 
disable the cursor, setting the character 
fonts and positioning the cursor in pixel 
increments. 

Other facilities have been 
implemented for the option of fixed 
format |/O. Initiated by PRINT_USING, 
followed by the required format — which 
contains a template of the required out- 
put — and items to print, fixed-formats 
may be utilised in screen displays or 
hard copy. 

A catalogue of the additional com- 
mands available is provided by Toolkit 
ll — a feature also consistent with the 
majority of the newer disc interfaces and 
expansion units which include a toolkit 
— by typing EXTRAS. <CTRL> & <F5> 
(pause) is generated for directory and 
view returns when a screen capacity has 
been reached. 

Taking advantage of the additional 
power provided by Toolkit Il, a new pro- 
gram released by Care Electronics and 
written by Colin Opie, CHARED, is a 
powertul utility for producing a range of 
custom fonts, icons and symbols. 

Supplied on Microdrive cartridge, the 
program includes two editor versions, 
one configured for use with disc, the 
other for use with Microdrive — a Super- 
Basic demonstration program illustrating 
graphically the application of the fonts, 
and nine pre-defined character sets, 
one of which is an animation font. 


x 


The editor screen will accommodate 
a complete set of 40 characters at a 
‘time, displaying simultaneously the 
character codes assigned to each. Win- 
dows are included in the display for life- 
size reproductions of the character in 
5x9, 6x10 and 12x20 pixel sizes. 
CHARED is designed to be used in con- 
junction with Toolkit Il and makes use 
of its CHAR_USE commands. 

That the importance of the additions 
to the QL operating system have been 
taken seriously can be verified by the 
fact that the majority of the better disc 
interfaces, with or without memory 
expansion, include an abbreviated ver- 
sion of Toolkit Il, utilising mainly the file- 
handling improvements. - 

Future developments of Toolkit II will 
almost certainly have only minor refine- 
ments to the already outstanding fea- 
tures achieved. While Toolkit is available 
only as an add-on for the present QL, 
the soon-to-be-released derivatives — 
the Thor, Tebby’s QLT and others — will 
probably have the Toolkit incorporated 
as part of their integral operating 
systems. 

With that in mind, it might be worth- 
while to point out that there are only a 
few programs which use some of the 
keywords, reserved by Toolkit, for their 
own purpose and so conflict with Toolkit 
Il functions. When one software house 


* was approached by the writer about the 


problem, the only suggestion offered 
was “to pull out the ROM” — something 
like that. 

When the idea of being prepared for 
compatibility with future versions of 
Qdos-based machines was suggested 
as being worth consideration, the 
response was a resounding pause, so 
we have to wait and see. 

In addition to an already excellent pro- 
duct, | was impressed with the very 
good documentation. Underlining the 
attention of Care to fine marketing 
details, Toolkit Il is supplied complete 
with a rack for storing up to six other 
ROMs. 

Looking at the superb features 
offered by Toolkit Il in terms of it not 
having been included as an integral part 
of the QL operating system as long ago 
as early 1985, one cannot help but be 
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reminded about the old adage pola 


ing a ha’p’worth of tar. 
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220a Tottenham Court Road, London, W1P9AF. ‘Tel: (01) 636 2547 
224 Tottenham Court Road, London, W1P 9AF. Tel: (01) 580 6382 
Telex 946240 Cweasy G (Quote 19010170) 
Leisure Languages 
Wanderer (Pyramide) .... Digital Supercharge V1.18 
Othello (Pyramide) ... Digital Forth + Reversi 
Vroom (Pyramide) .... 
Mortville Manor (Pyrai 
Dragon Hold (Rubicon) . 
Aquanaut (Micro deal) .. 
Flight Simulator (MD) 
Chess (Psion) 


BJ Return (Eidersoft) 
Spook (Eidersoft) 
Karate (Eidersoft) 
3D Slime (Datalink) 


Metacomco MCC Pascal 
Metacomco Lisp 
Metacomco BCPL .... 
Metacomco Assembl 
Prospero Fortran 77 ..... 
Talent Assembler Workbi 
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Special Pack 
Citadel/BJ 3D/Zapper 
£ 14.95 


QSpell (Eidersoft) 
Archiver (Eidersoft) 
Super Media Manager ( 
Mail List (Transform) .... 
Appointment Dairy (Tran: 
Stock Control 


Graphics 

TechnidL (Talent) .... 
QDraw (Talent) .... 
QL Peintre (Pyramide) 
Nucleon (Pyramide) 
Cad Pak (Datalink) 
Tasprint (Tasman) ... 
Tascopy (Tasman) .... 
Eye-Q (Digital P) . 
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Power Line Cleaner 
Miracle 256K Expanderam 
Miracle 512K Expanderam 
QL Computer Miracle Ram Disc Software 
MicroVitec Cub 14! ; Miracle/QCode Modaptor .. 
Philips CM 8533 Colour monitor Miracle WS2000 Modem .. 
Composite Video (phono) Nightingale Modem 

RGB — Linear input (SCART) : 
RGB/RGBI-TTL (for QL) PCML Disc Interface 

plus many other features .. . . PCML Dual 3.5” Disc Drive 
Philips BM7502 Mono Mon : . Cumana Disc Interface . £ 

: Cumana Dual 3.5” Disc Drive including /F . 
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For signs, pictures, advertisements, banners and notices. e189) 
Letters any size, any shape, any colour, any stipple, any mode. Pega Ske oS elie 
Easy designing & editing. Font editor. 5 fonts included. Walks (als) Stora es BON 
“Sign Designer is a delight to use and 


4 3 sate Amstrad, Atari, Commodore (Amiga) etc...... 
provides the services of an extremely useful utility All prices are including VAT. Postage above £20 on software is free. 


Sinclair QL World July issue. Wm lease add 50p to order under £20. For computer, printers & monitors 
VISA please add er 0 per em, Postal Tales “apply to UK only. 
25, TRINITY RISE, LONDON SW2 2QP. SEER ‘Drerests whore 0 eco 


UK’s LOWEST PRINTER PRICES 


DISK DRIVES 
CUMANA 

ee WITH ALL PRINTERS, QL USERS PRINTERS GUIDE 312” SINGLE DRIVE SYSTEM (.75m byte) £95.00 £109.25 
31” DUAL DRIVE SYSTEM (1.5m byte) £169.00 £192.35 


GOVERNMENT AND OFFICIAL OVERSEAS ORDERS WELCOME PCML INTERFACE (+ 256KRAM&ITOOLKIT £220.00 £253.00 
PLEASE RING FOR DISK INTERFACE (No RAM Expansion) £87.00 £100.05 
KAGA TAXAN KP810 - tysexrasie price. 


DOT MATRIX Os Peete £75.00 ‘£86.25 
PLUS NEAR LETTER QUALITY Ex VAT Inc VAT MICROVITEC CUB 1451/653 £220.00 £253.00 
SHINWA CP A80 + NLQ £165.00 £189.75 

EPSON LX 80 £190.00 £224.25 

CANON 1080A £219.00 £251.85 MODEMS 

JUKI5510 £209.00 £240.35 TANDATA (COMPLETE SYSTEM) 

CANON 1156 £335.00 £385.25 

EPSON FX 85 + £360.00 £414.00 FTW; 

EPSON FX 105 + £455.00 £523.25 pad a ARE ARIOUS) 

EPSON LQ 800 £515.00 £592.25 

EPSON LQ 1000 £546.00 £627.90 


EPSON LQ 1500 COMPUTERS 


SINCLAIR QL ONLY 
DAISY WHEEL 
QUENDATA 1120 £298.00 £258.75 COMPLETE PACK SPECIAL OFFER 


EPSON DX100 - SPECIAL OFFER: £356.00 £409.40 THE WORLD'S BEST With EPSON LX80 F/T £619.00 - £711.85 
PRICES ON SINCLAIR QL, 
MICROVITEC CUB 563, With CANON 1156- £842.00 - £968.30 


PRINTER & ALL LEADS 
core RT Ore: £450.00 £517.50 AND INTERFACES With KAGA TAXAN - £581.00 £668.15 


LY 3MINUTESFROM 


Now ON 62 
CTION 23 Mi INUTES' 


£29.95 M ANCHESTER 25M 
LEEDS 20 MINUTES) ar 
NB. From East use Junctio 


£173.05 £199.00 


PRINTER INTERFACES 
MIRACLE SYSTEMS £26.05 
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Now containing the complete QL Toolkit software as well as an easily used Ram-Drive 
. device driver, the CST QDisc is the longest established and most widely used floppy disc 
controller for the QL computer. The QDisc interface may be used with virtually any 3.5” 
or 5.25” floppy disc drives including, of course, CST's dual slim-line 720K (1 Megabyte 


unformatted) high performance, 80 track double sided drives. The Toolkit software 
provides a wide range of SuperBASIC commands and functions designed to allow the 
full power of the QL to be realised without resorting to machine code programming, 
giving access to job control, random access I/O, character sets, wild card file handling 
and so on. The Toolkit is included in the QDisc firmware, so it is ready for use as soon as 
the system is switched on, as is the Ram-drive device driver, which allows any unused 
memory to be used as a high speed storage mediuin, ideal for temporary results, and 
for saving screen images for high speed displays. Naturally the Ram-drive may be used 
to maximum advantage when used on a QL with additional memory such as the RAM- 
plus. 


Expanding the QL's memory from 128K to the maximum 640K, the CST RAM-plus is 
based on the latest 256K DRAMs to give full speed no wait-state operation and is 
housed in an elegant aluminium case which matches the QL and provides an expansion 
port allowing a peripheral interface, such as a QDisc floppy or Winchester controller to 
be plugged in. Adding high speed memory to the QL has several advantages: all QL 
programs run faster, including ones that make heavy use of disc or microdrive as QDos 
uses spare memory for buffering data; increased data space is available for 
SuperBASIC, Psion and other application packages and the QL’s multitasking ability is 
greatly enhanced by the ability to load several large programs simultaneously. The 
extra memory can also be used to advantage with the Ram-drive firmware supplied 
with the QDisc. For customers who have already purchased an earlier QDisc controller, 
the Ram-drive software can be supplied on floppy disc at a small charge. 


The flagship of the CST fleet of storage devices for the QL is the 20 Megabyte 
Winchester drive with integral floppy drive. The system is housed in a compact metal 
tes @ case with integral power supply and is interfaced to the QL by a small controller card. 
0 The floppy specification is the same as the standard QDisc; the Winchester is a high 
performance drive unit based on the new SCSI standard, which allows up to eight drives 
to be connected to one QL (available to special order). The Winchester firmware is fully 
compatible with standard microdrive and floppy QDos drivers, and also supports 
heirarchical directories and file date stamping. The directory structure allows files to be 
separated into compartments; for example, programs can be held in one directory 
while data for various projects can be held in other directories. This is essential when a 
disc can hold over 1000 files! Date stamping of files is used to keep a record of the last 
time every file on the Winchester was accessed, modified or backed up. This allows the 
Data Management Utility supplied with the system to archive only those files which 
have been changed since the last backup was performed. This greatly reduces the time 
taken to perform regular backups. 


Cambridge Systems Technology 
24 Green Street, Stevenage, Herts SG1 3DS 
Telephone: Stevenage (0438) 352150 


Please supply the following items: Name 


QDisc Interface including ram drive: £79.95 Address 
Dual 720K 3.5" Floppy Disc Drives: £219.95 
RAM-plus 512K Memory Expansion: £139.95 
QDisc + Dual Floppy Drive: £275.00 
QDisc + RAM-plus + Dual Floppy Drive: £405.00 
20Mb Winchester with floppy: £1150.00 
20Mb Winchester, floppy + RAM-plus: £1280.00 
Q488 IEEE GPIB interface: £224.25 
QEP-III Eprom Programmer: £115.00 
Q+4 Expansion System: £230.00 | Please deduct my Access/Mastercard/Eurocard/Diners Club a/c 
Utility disc including ram drive (3.5"): £10.00 

Utility disc including ram drive (5.25"): £10.00 Card No. (OP a il a =U 


Information on: 


Post Code ____________ Telephone 


| enclose a cheque/PO for £ 


EEL ee Py | 


Signature 


Prices are inclusive of VAT, postage and packaging in the UK only 
CST reserve the right to alter prices and specifications without prior notice 
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Each month our 
QL technical 
expert, Colin 
Opie, will sort 
through the 


Evaluating the QL 


Recently while writing a 
graph-plotting program in 
SuperBasic I had a problem. I 
wanted to be able to type-in an 
equation at the keyboard and 
then use that equation to plot 
its graph. 

The problem called for the 
use ofa VAL function — or EVAL 
in BBC Basic — which the QL 
does not support fully. 
Coercion works if the VALue of 
a string is justa number but not 
ifit isa string such as ‘SIN (0.5)’. 
So can anyone provide a DEF 
FUNCtion to perform the VAL 
function as found on Spectrum 
and Amstrad computers? 

Mark Pepper, 
Preston, Lancs. 


There are three main ways in 
which an EVAL function can be 
added to SuperBasic. Probably 
the best method would be to 
write the function in assembly 
language and add the ensuing 
machine code to the SuperBasic 
list of known functions. The 
EVAL function would need to 
have a string passed over to it 
which held the right-hand side 
of the equation. A fair degree of 
parsing would then have to 
occur to split the string into 
constants, operators — 
arithmetic or otherwise — and 
variables. At that point the 
SuperBasic name table may 
need accessing to find the 
current values of any variables. 
Finally, the appropriate 
mathematical operations would 
be carried-out and a floating 
point result returned by the 
function. 

At assembly language level 
there are two SuperBasic utility 
calls of particular use in 
implementing such an EVAL 
function. They are RLEXEC 
(vector $11C) and RILEXECB 
(vector $11E). The first will 
execute a single arithmetic 
operation and the latter will 
execute a specified list of 
operations. In practice, that 
means that you do not need to 
write your own sine or tangent 
operations — you can use the 
ones supplied by SuperBasic. 
For more information you 
could consult the Advanced 
User Guide or the book QL 
Assembly Language 


20 


mailbag and 
provide the answer 
to your 
programming 
problems. 


Programming published by 
McGraw-Hill. 

Despite this being the best 
overall solution, it will be 
time-consuming to implement 
and it will require some 
expertise in parsing techniques 
and assembly language 
programming. 

Another approach is to write 
the function in SuperBasic. You 
will still need to split the string 
expression into its constituent 
parts and you will still need to 
know how to analyse the 
expression to be able to 
evaluate it correctly. The 
function will be much easier to 
debug and the execution of 
mathematical operations and 
the grabbing of current values 
for variables will be performed 
naturally by SuperBasic. 

The main problems with the 
SuperBasic solution are 
memory requirements and 
speed. To perform the 
tokenising of the string 
expression, and the eventual 
evaluation of it, a number of 
arrays will have to be set up. The 
size of those arrays will dictate 
how complex the expression 
may be before we run out of 
space. Persistent access to array 
structures takes time. If you 
wish to display, say, 500 points 
across the screen, you could 
wait a long time to see the 
results, perhaps as long as 25-30 
seconds or even longer. 

A third solution is possible, 
provided the computer system 
will allow the merging of 
programs during the execution 
of the current program in 
memory. Hence the solution is 
viable so far as the QL is 
concerned. The program listing 
shown is a very simple 
demonstration of this method 
for obtaining an EVAL function: 
function. 


REMark Simple 
Solution to EVAL using 
110 REMark file merging. 
120 : 
130 REMARK Clear screen 
& set file name 
140 WINDOW 512,256,0,0: 
PAPER 0:CLS 
fyl$=‘mdv1_f2x’ 


100 


145 
150 
160 
180 
185 
187 


REMark Main program 
axis: get_expr:INK 4 
MRUN fy1$:DELETE fyl$ 
POINT -3,eval(1-3) 


+)/- 


190 FOR M=-3 TO 3 STEP 
3E-2 

200 LINE TO m,eval (m) 

210 END FOR m 

220 PRINT#0, ‘Any key to 
continue . . ’; 

IF INKEY$ (#0,-1)= '' :GO 

TO 230: END IF 

240 GO TO 180 

250 : 

260 DEFine PROCedure 
axis 

280 WINDOW 

448,200,32,16: BORDER 

#0,1,4 

CLS#0:CLS:INK#0,7: 

INK 7 

SCALE 4, -3.25,-2 

LINE -3,0 to 3,0:LINE 

0, -2 TO 0,2 

310 FOR b=-3 TO 3 

320 LINE b,-5E-2 TO b,0 

30 LINE 0,b TO 8E-2,b 

340 END FOR b 

350 AT 0,1: INK 2:PRINT 

‘Each division = 1’ 

AT 0,57: PRINT ‘Centre 

is (0,0)’ 

360 END DEFine 

370 : 

900 DEFine PROCedure 

get_expr 

PRINT #0, ‘y = ’;: 

INPUT #0.f$ 

OPEN NEW#3,fy1$ 

OPEN_NEW#3, fyl$ 

PRINT#3, ‘940 

RETurn ’;f$ 

920 CLOSE#3 

925 END DEFine 

930 : 

935 DEFine FuNction eval 

@&) 

RETurn SIN (x) 

END DEFine 


290 


295 
300 


355 


910 


912 
912 
915 


940 
945 


Figure 1. Simple 
implementation of EVAL 
using merging. 


In line 145 we have set up the 
name for the expression file we 
shall use. You may use any 
name you wish and the overall 
speed of response will be better 
from disc devices. If your 
machine supports RAM-discs, 
they would be the most obvious 
device to use. 

Lines 160 to 240 comprise the 
main program. All we are doing 
is setting-up a screen display 
with some axis, collecting an 
expression, and displaying the 
result. The procedure GET_ 
EXPR is the important one. it, 
displays the left-hand side of the 
expression as ‘y=’ and expects 


SIND 
LL 


i. § 


you to enter the right-hand side. 
For reasons which will soon 
become apparent the side we 
type-in must contain the 
variable ‘x’. GET_EXPR places 
the string ‘940 RETurn’ in front 
of our string input, writes out 
the whole lot to our expression 
file, and returns to the main 
program. The main program, at 
line 185, then merges this 
expression file with the current 
program, deletes the now 
superfluous file, and drops into 
the FOR loop which will display 
the graphical presentation of 
the expression. 

The important point is that 
when the expression file was 
merged into the current 
program, line 940 was changed 
to reflect the expression 
required. When the function 
EVAL is called from within the 
FOR loop, clearly the new 
expression line will be used for 
evaluation purposes. 


There are, however, some 
points which need watching. 
First, if you re-number the 
program you will also need to 
change the procedure 
GET_EXPR so that it writes-out 
the correct line number to 
merge. A less obvious point 
relates to the restrictions 
imposed on the merge facility 
in SuperBasic. You may not 
have an MRUN statement inside 
a subroutine, procedure or 
function body. If you do, the 
program will fail at the end of 
the subprogram body, because 
MRUN causes the SuperBasic 
return stack to be cleared. That 
is why our main program is not 
a procedure in its own right and 
also why we are using aGOTO 
at line 240 instead of making the 
main program one big REPeat 
loop. 

The program is relatively 
basic in its current state but you 
could build on it very easily. 
You could add procedures to 
allow the axis and their scales 
to be changed, or to permit 
parabolic type expressions by 
having different versions of the 
GET_EXPR and EVAL 
procedures. 


To see the demonstration 
program in action try the 
following right-hand sides: 
a) sin(x) b)sin(x)*cos(21x) 
c) x+1n(abs(x)) 

d) sin¢x) + sin(3*x)/3 
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+ sin(7*x)/7 

e) sin(10*x) + 0.2*cos(8*x) — 
0.2*cos(12*x) 

Example d shows how sine 
waves can be added to make 
approximations to a square 
wave, as in Fourier analysis. 
Example e is what is known as 
a modulated waveform. Such 
waveforms are used in, for 
example, radio 
communications. When trying 
your own expressions, be 
careful not to make a syntactical 
error or SuperBasic will 
complain. Also be careful not to 
try to perform illegal 
operations, for example by _ 
trying to take the square root of 
a negative number. If you use 
the Tony Tebby/Care Super 
Toolkit IT ROM, you could use 
the error-trapping facilities 
afforded by this ROM to 
improve the stability of the 
program. 


With reference to NJ. Lennon’s 
letter in the March 1985 edition 
of QL User, it appears that ifyou 
load a program into memory 
then type NEW or load another 
program, on reloading the 
same program the QL accesses 
the Microdrives for a very short 
time. It then hangs up for a short 
time before returning the 
cursor. 

I have reason to believe that 
during this hand-up process, 
the QL is scanning all the QL 
memory area, attempting to 
find the program and then to 
recover it. lam nota very good 
machine code programmer but 
I believe that there is a Qdos 
function somewhere which 
must be able to recall programs 
in memory. I hope some 
machine code genius can write 
a program to enable recovery 
of such programs which are 
floating in memory. Also if 
several RESPR commands are 
given, then to find the base of 
one of the commands, do you 
type PRINT RESPR(variable) or 
PRINT RESPR(0)? 

Ithink I read somewhere that 
PRINT RESPR(0) prints the base 
ofall reserved memory. Also is 
there any SuperBasic command 
which will release any memory 
reserved using RESPR to Qdos 
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and SuperBasic? 
N. Kasrawy, 
London NW3. 


There are a number of points 
of interest here and they can all 
be discussed under the general 
title of QL Memory 
Management. Regardless of 
how much RAM your particular 
QL has, Qdos — the QL 
Operating system — splits 
available memory into six main 
regions. 


At the top of available RAM 
there are the Resident 
Procedures. They are 
procedures, as the name 
suggests, which are to remain 
resident in the system for as 
long as the computer is 
switched on. Whenever you use 
a program which creates 
command extensions to 
SuperBasic, this region will be 
used. Within SuperBasic we can 
grab a block of resident 
procedure space for our own 
use by using a RESPR statement 
of the form: 


myspace=RESPR (2000) 

That example will reserve 
2,000 bytes of storage and 
return the base address of the 
reserved block, which we have 
assigned to the variable 
‘myspace’. 


If we were to enter the 
command ‘PRINT RESPR (0)’, 
we would be supplied with the 
current base of the resident 
procedure area and zero bytes 
will have been reserved, so the 
region’s base address as given 
will still be correct. 

There is no standard 
procedure for reclaiming 
resident procedure memory 
because that would be contrary 
to the purpose for this area in 
the first place. Although, 
theoretically, you could go 
poking around changing the 
system varible SV_RESPR so that 
it had the same value as 
SV_RAMT, the idea is alien to 
correct use of the QL memory. 
Finding the base of a number 
of reserved areas is easy — you 
were told of the base addresses 
when you first allocated the 
space. Make sure you use 
different variables for each 
RESPR call if you really need to 


- 
_ If you have a 


have sesparate areas and need 
to remember the base address 
of each of them. 


Between the SuperBasic 
region and the true ‘free 
memory’ region, Qdos allocates 
a certain amount of RAM to 
Filing Subsystem Slave Blocks. 
Those blocks contain copies of 
sectors loaded from or saved to 
an attached device during 
previous I/O operations. How 
many slave blocks are allocated 
will depend on how much 
memory your system has, The 
effect can be seen clearly when 
using add-on RAM. If you have 
a 256K extension RAM you will 
notice that on, say, using 
Archive, you do not gain an 
extra 256K of user space. Why? 
Because Qdos has seized the 
opportunity to grab a few more 
slave blocks. 

Those slave blocks have an 
effect on how much a device 
needs to be accessed. Suppose 
we load a SuperBasic program 
from a Microdrive cartridge. 
Initially the Microdrive is 
accessed for a relatively long 
period. If we. ask for the same 
program to be loaded again, 
Qdos checks that the Microdrive 
has not been changed — in case 
you have two different 
programs on different 
cartridges but with the same 
name —and then enters its load 
routine, Assuming the cartridge 
has not been changed there is 
every possibility that RAM slave 
blocks will contain the same 
data as the sectors on the 
cartridge. If that is the case, 
Qdos will collect the data from 
the slave blocks by preference. 

When a SuperBasic program 
is loaded into memory it is 
translated into internal format, 
which speeds program 
execution. It is immaterial 
whether the program is from 
slave blocks or from a physical 
cartridge; the translation work 
still has to be done. That is why 
there is a delay before the 
cursor returns. Program text is 
being collected from the slave 
block region, translate as 
normal, and entered into the 
SuperBasic region. Qdos is an 
extremely versatile and clever 
operating system and the delay 
is certainly not due to it 
meddling about in memory 
trying to find a lost program. 


solved, write to: 


Technical Helpline, 


79 —80 Petty France, 
London SW1H 9ED 


Memory usage: 
1. SV_RAMT $(top of RAM) 


2. SV_RESPR 
3. SV_TRANSP 
Ss 
4. SV_BASIC 
5. SV_FREE 


6. SV_HEAP 
$28000 


1. Resident Proc 
Area 


2. Transient Progs 
(EXEC’d QL jobs) 


3. Super_BASIC 
Area 


4. Filing system 
slave blocks 


5. Channels and 
common heap 


6. System 
tables & vars. 


The six main memory 
blocks corresponding to the 
system variables above. 


With reference to the QL User 
Guide Section Concepts page 
12 RS232C, can someone 
inform me how the pins are 
numbered on the telephone 
jack? Is pin 1 or pin 6 at the 
catch release side of the 
telephone-type jack. The 
information is required for 
connecting a Canon electronic 
typewriter as a printer. 


J. E. Cowper, 
Stourport-on-Severn 
Worcs. 


Pin 6 is at the catch release 
side, giving you the following 
pin-outs: 


PIN SER1 SER2 

1 SignalGND Signal GND 
SignalIN Signal OUT 

3 Signal OUT Signal IN 

4  ReadyIN ReadyOUT 

5  ReadyOUT Ready IN 

6 +12volts +12 volts 


The BT reference numbers 
for the plug required are 631A 
or 631W. 
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Marcus Jeffrey provides 
the final part of the 
machine code program 
from month and 
shows how to set up an 
attributes file and user 
defined graphics. 


last 


The Spectrum attributes file contains in- 
formation on the paper and ink colours 
of a particular character square. They 
are held in the byte format: 

fb ppp iii 

f — Setifflashing. 

b — Setif bright. 
ppp - Papercolour (Oto 7). 

ii — Inkcolour (Oto 7). 
The attribute code for the character in 
a particular position can be accessed 
with the command: 

ATTRiline,column) 

In our four-colour mode the QL can- 
not have flashing characters — unless 
we went to the trouble of inverting the 
appropriate bits on interrupts — or bright 
characters, SO we are concerned only 
with the bottom six bits. That is handled 
easily from SuperBasic, using the short 
function SATTR, shown in figure two. 
The variable start is assumed to be the 
location at which the code was loaded 
and should be global throughout the 
program. 

Finally, an oft-used Spectrum feature 
is User-Defined Graphics. In the 
Spectrum, it is an area of RAM which 
is used as an extension to the ordinary 
character set and thus can be POKEd 
by the user to produce special charac- 
ters. The Spectrum Block graphic 
characters have already been defined 
in our new 8 x 8 pixel font and they can 
be seen by printing the codes from1 28 
to 148, something along the lines: 
FOR i = 128 TO 143:SPRINT CHR§(i); 
should suffice. 


where: 


Figure 2. 


| 1000 DEFine FuNction SATTR (row, cel) 
1010 LOCal attributes.offset 
1020 attributes = start. + 570 
1030 offset = 32 * row + col 
1040 RETurn PEEK 
(attributes+offset) && 63 
i050 END DEFine SATTR 


To poke the user-defined graphics, 
-the Spectrum has a command USR 
which is followed by a lower-case letter 
in the range ‘a’ to ‘u’. That returns the 
appropriate address and the new 
character codes are then POKEd into it 
and the following seven byte locations. 
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SPECTRUM SIMULATION 


LOC 
052A" 
0532" 
0538" 
0542" 
054A" 
0552’ 
055A" 
0562" 
056A" 
0572! 
O57A° 
0562' 
058A‘ 
0592’ 
059A" 
O5A2" 
058A" 
0582’ 
O3RA 
05¢2" 
O5CA’ 
0502" 
OSDA’ 
Q5E2" 
O5EA" 
O5F2' 
SFA’ 
0602" 
0508" 
612° 
06.4" 
0677" 
DoZh" 
0632" 
0638’ 
0642" 
064A" 
0652’ 
965A" 
0662" 
056A" 
0672° 
067A" 
0682" 
068A’ 
0692' 
969A" 
06A2' 
ObAA' 
06R2" 
06BA" 
06C2' 
O6CA’ 
0602’ 
OoDA’ 
06E2° 
OOEA* 
O6F2° 
OFA’ 
0702' 
O70A° 
0712' 
O71A" 
0722' 
072A" 
0732" 
O73" 
0742" 
0748" 
0752’ 
0758" 
0762' 


OBJECT 
0010 2810 2044 3A00 
0098 1000 0000 0009 
0004 0808 0808 0400 
0020 1010 1010 2006 
0000 1408 3E08 1400 
0000 0808 3698 0Bc0 
0000 0000 0008 0810 
0000 0000 3E90 0000 
0000 0000 0018 1800 
6000 0204 0810 2000 
O03C 464A 5262 3C00 
0018 2808 0808 3E00 
0030 4202 3040 7E09 
Q03C 4200 0242 3000 
0008 1828 487E 0B00 
OO7E 4070 0242 3000 
Q03C 4070 4242 3000 
OO7E 0204 0810 1000 
OO3C 4230 4242 3C00 
QO3C 4242 3E02 3000 
000 0010 0009 1090 
0000 1990 9019 1020 
0000 0498 1008 0400 
0000 O03E O93E 6900 
0000 1008 0408 1000 
003C 4204 0800 0800 
QO3C 4856 5E40 3000 
Q03C 4242 7642 4200 
QO7C 4270 4242 7000 
QO3C 4240 4082 3C00 
0078 4442 4244 7800 
QOTE 4070 4040 TENG 
QO7E 4070 4040 4000 
O03C 4240 4642 3000 
042 427E 4242 4200 
O03E 0808 0BOR 3E00 
0002 0202 4242 3c00 
6044 $870 4884 4206 
0040 4040 4040 7E00 
0042 665A 4242 4200 
0042 6252 4046 4200 
QO3C 4242 4242 3000 
0070 4242 7040 4000 
O03C 4242 528A 3000 
007C 4242 7644 4200 
O03C 403C 0242 3000 
QOFE 1010 1010 1000 
0042 4242 4282 3000 
0042 4242 4224 1900 
0082 4242 4250 2400 
0042 2418 1924 4200 
0062 4428 1010 1000 
Q07E 0408 1020 7E00 
QO0E 0808 0808 E00 
0000 4020 1008 0400 
0070 1010 1010 7000 
0010 3854 1010 1000 
0009 0000 0000 OOFF 
OO1C 2278 2020 7£00 
0000 3804 3044 3C00 
0020 203C 2222 3000 
0000 1£20 2020 1c00 
0004 043C 4444 3C00 
0000 3844 7940 3C00 
QOOC 1018 1010 1000 
6000 3044 4430 0438 
0040 4078 4444 4400 
0910 0030 1010 3800 
0004 0004 0404 2418 
0020 2630 3028 2800 
O10 1010 1610 oced 
0000 6854 5454 5400 


STM 


T 
2i1 
212 
213 
14 
215 
216 
217 
218 
219 
220 
221 
222 
223 
224 
225 
226 
i2 
23 
2a 
232 
233 
234 
235 
234 
237 
238 
239 
240 
241 
242 
243 
244 
245 
245 
247 
249 
249 
Pasi 
235i 
252 
293 
254 
255 
256 
257 
258 
259 
260 
261 
262 
263 
264 
265 
266 
267 
268 
269 
270 
274 
772 
273 
z74 
Paha] 
276 
277 
278 
277 
280 
281 


282 


Listing 1. Continued from July Issue. 
SOURCE STATEMENT 


DC.B 
C.E 
DC.B 
DC. 
DC.B 


(se) 
oa 
fo oy MO oo oO oo 


Po Po os 
ce eed ee See ee 
[p= = = es i 2 < - - - --s - o o 


evrVPoPVPuo rota 


i 
OAM AAAAReaAaaan 


o 


m Dp 
eS | 


wy 


Do eo to 
18d oe Oo eo 9 


tor 9 onc 


VPuouPrPoDoevDaes 
Ca 63 co 8 es 3 oy 


c=] 


Porovuoy 
aca s ca er es ce Say iene 


ovo 


$00, $10, $28,$10,$2A,$44,$3A,$00 = & 
$00, $08, $10, $00, $00, $00, $00, $00 
$00, $04, $08, $08, $08,$08, $04,800 
$00,$20,$10,$10,$10,$10,$20,$00 
$00, $00,$14, $08, $3E,$08,$14,800 + 
$00, $00, $08, $08,$3E, $08,808,800 = + 
$00, $00, $00, $00, $00,$08,808,$10. 
$00, $00, $00,$00,$3E, $00,800,800  - 
$00, $00, $00,$00,$00,$18, $18,800 
$00,$00,$02,$04,$08,$10,$20,300 = / 
$00, $30, $44, $40, $52, $62, $30, $00 
$00, $18, $28, $08, $08, $08, $3E, $00 
$00, $30, $42, $02, $30, $40, $7E, $00 
$00, $30, $42, $0C, $02, $42, $30, $00 
$00, $08, $18, $28, $48, $7E, $08, $00 
$00, $7E, $40, $70, $02, $42, $30, $00 
$00, $30, $40, #70, $42, $42, $30, $00 
$00, $7E, $02, $04, $08, $10, $19, $00 
$00, $30, $42, $30, $42, $42, $3C, $00 
$00, $30, $42, $42, $3E, $02, $3, $00 
$00, $00, #00, $10,$00,500,$10,800 
$00, $00,$10,$00,$00,$10,810,820 
$00, $00, $04, $08,$10,$08,804,800  ¢ 
$00, $00, $00, $3E, $00, $3E, $00, $00 
$00, $00, $10, $08, $04. $08, $10, $00 
$00, $30, $42, $04, $08, $00, $08, $00 
$00, $30, $40, $54, $5£, $40, $30, $00 
$00, $3C, $42, $42, $7E, $42, $42, $00 
$00, $70, $42, $70, $42, $42, $70, $00 
$00, $30, $42, $40, $40, $42, $30, $00 
$00, $78, $44, $42, $42, $44, $78, $00 
$0, $7E, $40, $70, $40, $40, $7E, $00 
$00, $7E, $40, $70, $40, $40, $40, $00 
$00, $30, $42, $40, $4E, $42, $30, $00 
$00, $42, $42, $7E, $42, $42, $42, $00 
$00, $3E, $08, $08, $08, $08, $3E, $00 
$00, $02, $02, $02, $42, $42, $30, $00 
$00, $44, $48, $70, $48, $44, $42, $00 
$00, $40, $40, $40, $40, $40, $7, $00 
$00, $42, $66, $58, $42, $42, $42, $00 
$00, $42, $62, $52, $40, $46, $42, $00 
$00, $3C, $42, $42. $42, $42, $30, $00 
$00, $70, $42, $42, $70, $40, $40, $00 
$00, $30, $42, $42, $52, $48, $30, $00 
$00, $70, $42, $42, $70, $44, $42, $00 
$00, $30, $40, $3, $02, $42, $30, $90 
$00, $FE, $10, $10, $10, $10, $10, $00 
$i), $42, $42, $42, $42, $42, $30, $00 
$00, $42, $42, $42, $42, $24, $18, $00 . 
$00, $42, $42, $42, $42, $50, $24, $00 
$00,$42,$24,$18,$18,$24,842,900 x 
$00,$82,$44,$28,$10,$10,$10,$00 
$00, $7E,$04,$08,$10,$20,$7E,$00 1 
$00, $0E, $08, $08,$08,608,$0E,$00 
\ 
} 
U 


= 


wo OO en ey FO ee 


or es ian i ee 


= = 


a 


= es = =| 


$00, $00, $40, $20, $10, $08, $04, $00 
$00, $70, $10, $10, $10, $10, $70, $00 
$00, $10, $38, $54, $10, $10, $10, $00 
$00, $00, $00, $00, $00, $00, $00, $FF 
$00, $1C, $22, $78, $20, $20, $7E, $00 
$00, $00, $38, $04, $30, $44, $30, $00 
$00, $20, $20, $3C, $22, $22, $30, $00 
$00, $00, SIC, $20, $20, $20, $10, $00 
$00, $04, $04, $30, $44, $44, $30, $00 
$00, $00, $38, $44,$78, $40, $3C, $00 
$00, $00, $10, $18, $10, $10, $10, $00 
$00, $00, $30, $44, $44, $30, $04, $38 
$00, $40, $40, $78, $44, $44, $44, $00 
#00, $10, $00, $20, $10, $10, $38, $00 
$00, $04, $00, $04, $04, $04, $24, $18 
$00, $20, $28, $30, $30, $28, $24, $00 
$00, $10, $10, $10, $10, $10, $0C, $00 
$00, $00, $68, $54, $54, $54, $54, $00 


P-arrow 


Pound sign 


ater Foo we On ow 
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That again can be handled by a short 


mf 
a 


ch 
2050 END DEFine SUSR 


ee LOC OBJECT STMT SOURCE STATEMENT 
‘SuperBasic procedure, as shown in fi- O76A’ O000 7844 4444 4400 283 DC.R $00, $00, $78,$44, $44,944, $44,800 
gure three. Using this procedure, a few 0772’ 0000 3844 4444 2800 284 DC.B $00, $00, $38, $44,944, $44, $3,400 9 
simple lines such as: 077A" 0000 7844 4478 4040 © 285 DC.B «$00, $00, $78, $44,$44,$78, $40,840 
0782’ 0000 3044 4430 0406 286 DC.H $00, $00, $30, $44,$44, $30, $04,906 9 
FOR i = SUSR(“a”) TO SUSR(‘a’”)+7 078A’ 0000 1629 2020 2060 © 287 DC.B «$00, #00, $10, $20, $20, $20,820,800 5 
READ j 0792’ 0000 3840 3804 7800 289 DE.B $00, $00, $38, $40,$32, $04, $78,909 « 
POKEi, 0794" 0010 3819 1010 oc 28 DCB «$00, $10, $38, $10, $10, $10, $00,500 t 
y O7A2" G00 4244 42444 DEB «$00, $00, $44,944,944, $44,538,800 
END FORi Q7AA’ 0000 4444 2828 DE.B $00, $00, $44, $44,928, $28, $10,800 
O7R2' 0000 4454 5454 2600 DC.B $00, $00,$44,$54, 354, $54,828,800 
Data 0,0,2,60,84,20,20,0 O7BA‘ 0000 4428 1028 DCB «$00, $00, $44,$28,$10,$28, $44,800 
i define the “ce piel Th O702’ O00 4448 4430 043 DE.B $00, $00, $44,$44,$44, $30,304,533 
Wi Cae Sel. CSE | o7ea’ 0000 7608 1020 7000 DE.B —-$90, $00, $70, $08, $10, #20, $70,900 
characters can then be printed as codes | 759° oqoe oas0 0808 0£06 DLE «$00, $0E,$08,$30,$08, $08, $06,800 ¢ 
144 onwards. So, to print the newly-de- | o7na’ 00g 0808 0808 0800 297 DU.B #00, $08, $08, $08, $08, $08,$08,$00 line 
fined ‘pi’, type: O7E2° 0070 1000 1016 7000 © 298 DEB ~  $00,$70,$10,$00,$10,$10,$70,600 3 
SPRINT CHR$ (144) O7EA’ G014 2800 000 ob00 299 DE.B «$00, $14, $28, $00,$00,$00,$00,800  * 
O7F2' 3042 99AL A199 4230 © 300 DEB «$30, $42, $99, $A1,$A1,$99,$42,$3 copyright 
Figure 3. O7FA’ 0000 0000 0OG0 GoD0 301 DC.E $00, $00, $00, $00, $00, $00,800,800 Block graphics... 
; : B02’ OFOF OFOF 0900 0000 362 _DC.B —--$0F, SOF, $F $0F, $00, $00, $00, $00 
So ee eae Pre gE E EN QB0A’ FOFO FOFO 0000 0000 303 DL.B $F, $F, $0, $F0, $00, $00, $00, $00 
2020 ehers = stare's 127 OBi2' FFFF FFFF 0000 0000 3 DE.B «$F, $FF, $F, $FF, $00, $00, $1 
2030 offset = 8 * (CODE(chs)+ 47) OBIA’ 0000 0000 OFOF OFOF 305 DEB $00, $00, $00, $00, $0F, $0F, SOF, 
ore pee Cee sr eet 0822’ OFOF OFOF OFOF OFOF 306 Bo $0F, SOF, SOF, $0F, $0F, SOF, $¢ 
082A’ FOFO FOFO OFOF OFOF © 307 DC.B «SFO, $F, $F0, $F0, $0F, $0F, $1 
0832’ FFFF FFFF GFOF OFOF © 308 DC.R © SFF, $FF, SFF,$FF,$0F, $0F, 30F, $0F 
Finally, do not forget that with this | 083A’ 0000 0000 Foro FOFO = 309 DC.B $00, $00, $00, $00, $F0, #F0, $F0, $70 
system you have the best of both | 0882’ OFOF OFOF FOFO Foro 319 oy see aal ss “a at a ann 
+4 O84A' FOFO FOFO FOFO FOFG © 312 DC. $F0, $F0, $F 0, 3F0, $70, $F0, $F0, $F0 
worlds. In addition to the Spectrum sc- Q852' FFFF FFFF FOFO FOFO © 312 DER -SFF, $FF, SFF, $FF,$F0, $F0, $F0, $FC 
reen layout and re-definable character | ogsq- ooo cova FFFF FFFF 313 DE.B —-$00, $00, $00, $00, $FF, SF, $FF, SFF 
font, making Spectrum conversions | 942° oFOF OFOF FFFF FFFF 314 DC.B «SOF, $0F, $0F, $0F, $FF, SFF, SF, SFF 
much easier, all the QL print, plot, scroll | 0868" FOFO FOFO FFFF FFFF © 315 DC.R «$F, $F 0, $F0, $F0, $F, $FF, $FF, SFF 
and window commands will still work | 9872’ FFFF FFFF FFFF FFFF 316 Di.B -SFF,SFF,$FF,$FF,S$FF,$FF, SPF, $FF 
087A" =00A8 317 USERGRA DS.B 2148 User-defined graphics 


on the Spectrum screen. So you could, mee 
say, easily mix 9 x 5 and 8 x 8 grid 315 
character fonts on the same line. 


m 
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UNBEATABLE PRICES! 


APPROVED ONLY 
tacommunatonastems The only communications package for the QL. Fo 
‘eacommuncations —— The modules are available separately but, by @ 
‘PRICES INCLUDE VAT Pep 


conditions nthe fa using all three as a complete matched system, 


instructions for use 


full advantage can be taken of the integrated 


features. 
rT rrAAiccr—.. ~ Re like to know more about Tandata d 
Q-CON N ECT | communications for the QL. | 
Complete RS 232 output for general beware | 
communications from 75-9600 baud with full 
two way buffering and flow control. Software | | 
on a micro drive to support all 3 modules | | 
includes Prestel Viewdata/Videotex and a 
— VT100 emulation, and many other features. | | 
Q-MOD | | | 
Ta nda ta Manual dial V23 modem operating at 1200/75 I | 
‘ ei bps and 1200/1200 half duplex. bcaiy | 
Tandata Marketing Limited a 
Albert Road North, Malvern, Worcs. WR14 2LT. Q-CALL | Send to: | 
felephonesOG845168421 Mlclex:, S376 landatG) aa Tandata Marketing Ltd., 
Prestel *799# Telecom Gold 81: TANOO1 Provides traditional pulse/loop disconnect | albert Road North, Malvern, | 
Prestel is a eoiteed tate Racor Lee aan pic auto-dial and auto answer. | Worcs. WR14 2TL. | 
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POCKET 


PERIPHERAL 


sion, the company respon- 
sible for those handy pro- 
grams you receive with 
every QL, almost two years 
ago produced something 
called an Organiser. It met with mixed 
response. Although presented as the 
first truly pocketable computer, its small 
physical dimensions were matched by 
meagre RAM capacity, a single-line 
display and limited programming capa- 
bility. Despite that the Organiser met 
with some success, as anyone who has 
shopped in Marks and Spencer will 
know. 

Psion has not been sitting on its 
hands for the last two years and has 
now produced Organiser Il. The new 
machine has a two-line LCD display, 
vastly-increased RAM, a more powerful 
programming language, OPL, and in- 
creased possibilities for interfacing via 
the standard RS232 port. 


What makes Organiser II of such in- 
terest to a QL owner? Having used it for 
the last few weeks, | find it virtually indis- 
pensible. In addition, the Organiser II 
programming language OPL, not sur- 
prisingly, bears some resemblance to 
Archive. if you think about that while 
looking at the RS282 the possibilities 
become exciting. 

Two-way communications between 
the QL and Organiser || could provide 
a portable peripheral on which data 
could be recorded when convenient — 
say at a conference, on the train, or 
aircraft, and downloaded to the QL for 
processing later. Eidersoft is working on 
a lead and software to do just that. 

What has Organiser II to offer? The 
£100 basic model CM which | have been 
using has 8K of RAM, 24K ROM con- 
taining the operating system and OPL 
language, and slots for two 64K EP- 
ROMs or datapacks. 

The datapacks are treated in much 
the same way as disc drives but, being 
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solid state devices are, of course, much 
faster. Datapacks can be supplied blank 
for use as storage devices or with soft- 
ware on board. Two packages are avail- 
able from Psion, Finance Pack and 
Maths Pack. The higher-specification 
£140 model XP has twice the available 
RAM, 16K, a 32K ROM, capacity for 
128K datapacks, and provision for an 
optional bar code or magnetic card 
reader. 

All the functions of Organiser II are 
accessed via a top level menu which is 
displayed on power-up. The primary 
function of Organiser Il is as a simple 
database. The resident software per- 
mits storage of individual records of up 
to 254 characters. Each record can be 
up to 16 lines long and if lines are longer 
than 16 characters the display scrolls 
from left to right so that you can read 
the whole thing. 

The most obvious use of the facility 
is aS an address book. Entries cannot 
be sorted alphabetically or processed 
in any other way, except perhaps via 
the QL, but any item may be retrieved 
on input of a search pattern of three or 
more characters. 


A search for DOC will provide the re- 
levant details filed under DOCTOR, 
DOCHERTY or DOVER DOCKS. The 
search function, called FIND on the 
menu, is not field-specific, so it is pos- 
sible to look for, say, everyone with a 
Norwich telephone number by FINDing 
the prefix 0604. 

The model CM which | have been 
using holds slightly more than 100 
names, addresses and telephone num- 
bers in RAM, referred to as device A. 
That occupies almost all the available 
memory space, so it will be necessary 
to copy it to the 16K datapack — device 
B or C, depending which slot it oc- 
cupies. 

lf you are the kind of person whose 
address book resembles a telephone 


directory, 64K datapacks, or the 128K 
giants supplied with the XP, may be an 
essential extra. 

In addition to more capacity, data- 
packs have the advantage of being 
more permanent than the battery- 
backed RAM. In the event that they be- 
come filled with garbage or outdated 
information they can be returned to 
Psion for re-formatting, or you can do 
it yourself, though usage would need to 
be heavy to justify the £45 price of the 
formatter. 


The second most immediately useful 
function of Organiser Il is ‘the diary. 
Selection of that option from the menu 
displays the current day and date, 
together with the next available time 
slot. The diary pages are divided into 
48 half-hour slots. The whole day can 
be scrolled through in seconds using 
the cursor keys, as can the days up to 
the year 1999. 

To make an entry you start typing-in 
the appropriate time slot. An alarm can 
be programmed to sound at any time 
up to 59 minutes before the appointed 
time — useful if you have forgotten, 
embarrassing if you happen to be at the 
theatre. In addition to the alarm, the pre- 
viously-entered text is displayed on the 
screen, thus avoiding the ‘knot in hand- 
kerchief’ problem of knowing you have 
something to do but not knowing what 
it is. 

The diary has a number of other 
features. LIST displays all entries from 
the current system time, FIND allows 
you to pinpoint Uncle Harry’s birthday, 
GOTO is fairly self-explanatory. House- 
keeping functions like SAVE, TIDY and 
RESTORE allow saving to datapacks 
and deletion of out-of-date entries to 
free memory space. 

Organiser || also has eight individual 
alarms which can be programmed to 
sound at regular hourly, daily or weekly 
intervals. 
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The Psion Organiser Il, a 
powerful computer in its 
own right, shows potential 
as a useful QL peripheral. 
Ken McMahon examines 
the possibilities. 


Undoubtedly there will be those who 
look on the features described so far as 
nothing more than electronic gimmickry. 
It would be fair to say that, on that basis, 
Organiser II does little which could not 
be achieved by a manually-organised 
person with a pencil and paper, albeit 
more slowly. 

The real power of Organiser ll, 
however, lies in the versatility it provides 
through its powerful, high-level pro- 
gramming language OPL. It opens two 
possibilities. Applications packages can 
be bought off the shelf and those with 
programming experience can write their 
own. There is, of course, nothing new 
in this; people have been doing it for a 
considerable time. It is the size and por- 
tability of Organiser II which provides 
the justification. 


An example of what can be achieved 
with Organiser Il is illustrated by the 
Finance Pack. The suite of programs 
contains two applications which could 
be described as useful and extensive, 
and six which could not. The latter six 
include programs to calculate mortgage 
repayments, APR on loans, and com- 
pound interest. They are the kind of pro- 
jects given to O level computer students 
to spend half an hour and the time taken 
to write them is roughly indicative of their 
utility. BANK and EXPENSES, on the 
other hand, more than compensate for 
the shortfall. 

BANK is described adequately in the 
manual as ‘a complete bank account 
transaction recorder’. It allows you to 
keep a record of all cheques, credits 
and standing orders. Particular pay- 
ments can be searched, so it is possible 
to discover when you paid the telephone 
bill if BT threatens to cut you off. 

In preparation for arguments with the 
bank manager, you can obtain a print- 
out of your statement and records can 
be archived to datapack for future refer- 
ence. 
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EXPENSES provides a record of all “ 


business expenses incurred for a 
period. Amounts are categorised uner 
a heading such as entertainment or 
travel and more information can be 
added if required. Each entry is date- 
stamped and, once again, an option to 
print is provided. 

There is nothing new about that kind 
of application —several similar ones exist 
for the QL. The advantage is to have 
them running on something which is 
portable and battery-backed, i.e., per- 
manent. Though it is likely that more 
software will appear for Organiser ll, - 
there may be certain applications for 
which programs will need to be written. 
Of the 200 pages in the Organiser II 
manual, more than half are devoted to 
the OPL language and it is obviously 
outside the scope of this review to 
examine it in depth. 

Briefly, though, OPL can be 
described as a more highly-structured 
version of Basic which bears certain 
resemblances to Archive. OPL is com- 
piled prior to running, which gives 
enhanced speed as well as saving 
valuable memory space. Source files 
can be saved to RAM during program 
development but can be scratched or 
saved to a datapack once the final ob- 
ject code has been generated. 


The news that Eidersoft is marketing 
an RS232 lead and software to permit 
transfer of files between Archive and 
Organiser II enhances its attractiveness 
considerably. It opens the possibility of 
using the organiser as a pocket micro, 


transferring files to the QL for more 
sophisticated data processing require- 
ments. 

Psion has already produced an 
emulator for the IBM PC; to do so for 
the more closely-related QL would be 
a task to which many are equivalent. If 
that were to happen, Organiser II would 
surely be the ultimate peripheral. 


QL Dust Covers 
Spectrum + 


Amstrad Monitor 
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5556 11" x 14%" 
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Box + 10 cartridges 
Box + 20 cartridges 
@ Microdrive storage box is available from 
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MICRODRIVE CARTRIDGES 
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ESSENTIAL FOR TEXT AND 
SUPERB FOR GRAPHICS 


HIGH RESOLUTION 
COLOUR MONITOR 
14” SCREEN 
RESOLUTION 585 x 895 PIXELS 
AVAILABLE IN WOOD 
OR METAL CASE 


(Add £25.00 excl. VAT for metal case.) 
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— 14 day money back guarantee on all products — 
— 12 month warranty on all products — 
QL CENTRONICS PRINTER INTERFACE 


* Complete unit including 3 metre cable 
* Plugs into either SER] or SER2 


QL SERIAL CABLE 
* 3metre cable 
QL JOYSTICK ADAPTOR 
* Lets Atari/Commodore/Spectrum joysticks plug into CTL ports 
QL SCREEN DUMP 
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QL MODAPTOR 
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Ron Massey, 
reviews the latest 
applications 
packages to appear 
ms for the QL. 


An initial examination of the 
minimal CAD PAK 
documentation will give you 
an idea exactly how 
user-friendly the drawing 
package is. Dealing mainly 
with the use of the various 
icons, the miniscule 
instruction leaflet covers the 
essentials of getting the 
system under way 
completely. 

With the exception of text 
and file information, all CAD 
PAK operation may be done 
with mouse, joystick or 
cursor keys. Once up and 
running, you are presented 
with the complete range of 
system controls in the form 
of icons, system access 
commands and sampler 
windows. 

To the left of the drawing 
screen two columns of icons 
offer virtually every drawing 
tool imaginable and include 
cut-and-paste, single lines in 
any of six widths, multiple 
lines in any of four patterns, 
spray facility, as well as the 
more usual features such as 
eraser, screen wipe, and text 
option selection. 

Directly above the 
drawing page, a row of 
commands access system 
controls which, when 
cursor-selected, produce 
drop-down menus providing 


additional options. 

When CAD PAK is 
examined in detail, almost 
every illustration 
requirement is catered for. 
Text is available in four sizes; 
nine cursor types are 
available; a help window 
supplies operation 
reminders; the “STORE” 
option menu gives complete 
access to directories, file I/O, 
device — Microdrive or 
floppy — selection, or 
deleting an existing drawing, 
an important feature often 
omitted from illustration 
packages, where frequent 
updating of a drawing is 
made. 

The CAD PAK auto- 
geometry includes rubber- 
banding of lines, triangles, 


squares, circles and 
polygons. An unusual 
omission, however, a 
provision for arcs has not 
been included. 

The lower area of ascreen 
is occupied, to the left, by a 
preview window indicating 
the effect of the drawing 
tool, shown in the ink colour 
selected. To the right of it is 
a column of the four solid 
colours available to mode 4; 
the remainder of the palette 
is obtainable from the 
“COLOURS” menu at the top 
of the screen. 

To the right of the mode 
4 colour icons are 22 


additional icons which 
provide pre-defined 
patterns; the size of each 
pattern footprint is available 
in three sizes. 

The principal weaknesses 
of CAD PAK are mainly in 
that, if the name is to be 
taken literally, it lacks some 
of the features expected ofa 
true CAD package intended 
for producing technical 
illustrations. It is surprising 
that referencing the x/y 
co-ordinates, a feature 
necessary for measuring line 
lengths and accurate cursor 
re-positioning, has not been 
included in the screen 
information. Even more 
important, however, is that 
contrary to the packaging 
insert illustration, it is not 
possible to produce 


full-screen representation of 
the drawing for either 
screen photography or 
printer dump. 

The CAD PAK screen 
dump does an excellent job 
of converting solid colour 
and stipples to distinctively 
individual monochrome 
patterns but, printed 
horizontally full-width on A4 
paper, approximately 22 
percent distortion of the 
image occurs. Also the entire 
screen is dumped after the 
black-and-white tones are 
reversed temporarily to 
accommodate the dump 
routine. 

Whether you like the CAD 
PAK approach to drawing 
will depend largely on 


_ whether or not you like 


having all your drawing aids 
in front of you all of the time. 
I liked the approach, 
although it reduces the 
amount of drawing area 


If you are looking for a 
good general illustration 
package, CAD PAK has a 
great deal to commend it. 
If revised editions are 
released, I would like to see 
a better screen dump, a 
facility to produce a 


Revolutionary Software from Ark 


full-screen drawing for 
reproduction purposes, and 
an option for users to define 
their own patterns, which 
would displace temporarily 
those used for the icons in 
the lower set of icon 
windows. 


link-compatible program 
applications employing the 
Archive run-time module, 
Ark is pioneering a 
revolutionary service for QL 
users with its new database 
management series. 
Designed as a professional- 
grade utilisation of 
information processing and 
presented in a manner 
which is as easy-to-use as 
possible, each of the 
programs employs a related 
system of record-keeping 
The three systems dealt 
with in this review are aimed 
at particular applications. 
Versatile enough to cover a 
wide range of additional 
uses, Ark Distribution will 
undertake re-configuring 
programs for individual and 
more specialised purposes. 
No assumption is made 
throughout the use of the 
programs regarding a user’s 
familiarity with databases. 
The layout, however, is as 
easy to use for beginners as 


Continued on page 28 
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available. 


Continued from page 27 


for highly-qualified 
professional users. 

Probably of more 
importance are the invisible 
features which are never 
readily apparent in a 
well-thought-out 
program. One of those 
features pertains to 
economical memory 
management. While not so 
important when applied to 
640K memory systems, a 
standard QL will have most 
of its memory occupied by 
the main screen and the 
programme operating 
system. 

Ark has ensured that the 
maximum economy is made 
of the remaining memory 
for indexing data file 
positions, ordering and 
selection of information. In 
use, relatively few records 
need to be kept in RAM at 
any time. 

A section of the manual 
covers a complete 
description of memory 
requirements as related to 
the use of the file systems. 
As an added bonus, 
background information is 
detailed concisely regarding 
the nature of the QL memory 
and how it is possible to 
obtain the greatest amount 
of economy with Ark 
database operation. 

When using any of the Ark 
systems with a standard QL 
and Microdrive storage, it is 
advisable to calculate the 
number of of files required 
on a cartridge for record 
storage. Detailed 
instructions are included 
with each program for 
obtaining rough calculations 
for individual applications 
and record types. 

Thorough trapping is 
included in the program for 
operator and system errors. 
Unlike the usual laconic 
error massages seen usually 
with the QL, helpful 
suggestions are included 
along with any error 
messages given. 

Cardfile Manager. This 
versatile filing system is 
designed for use with a 
pre-defined 44-field file 
structure which includes 
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general details in addition to 
personal, company and 
mailing addresses. One of 
the distinguishing features 
of Cardfile is its ability to 
utilise optional computer- 
assisted projection of 
addresses — personal and 
company — and relevant 
salutary and complementary 
closes during insert and 
alter operations. 

Other features include 
automatic record searches 
which can include text 
embedded within other text. 
Searches are also case- 
independent, adding greater 
power to the facility. When 
used with the expanded QL 
version, Cardfile also 
includes the use of an 
18-field Mailfile and an eight 
field Address file. 

Mailfile Manager. 
Occupying a smaller amount 
of QL memory, this 
application employs a 
pre-defined 25-field file 
structure covering a mailing 
address, notes and general 
details. With provision of 
four fields of notes totalling 
933 characters, the system is 
for more general use than 
Cardfile manager. 

Acompact system, Mailfile 
includes 25 mail-file fields, 
21 general-file fields and 
eight address fields. During 
normal back-up procedures, 
file structures are 
rationalised and, in effect, 
will usually be more 
compact than the original 
master file. That ensures, yet 
again, that maximum storage 
economy is utilised. 

Librarian Manager. This 
system employs a pre- 
defined 25-field library file 
structure covering title , 
author, subject, general 
details, notes and a mailing 
address. Slightly more 
complex than the previous 
two systems, additional 
features include the option 
of selecting a range of fields 
for printing. A second 
feature runs a system check 
indicating how many 
volumes exist in the current 
file and the monetary value 
ofthe current file in decimal 
units. 


Of considerable 
importance for users 
wishing to produce both 
computer files and printed 
library cards, Librarian 
supports a standard printing 
structure for card file 
indices. In practical terms, 
an experienced librarian 
will require approximately 
one hour to classify and 
index five books; utilising 
Librarian, the same period 
will produce finished 
indexing of 20 books. 

Underlining the attention 
to detail, the manuals 
included with the data 
management systems are 
presented expertly. You can 
start immediately by 
following the concise 
instructions on a single 
page. As your familiarity with 
the system increases you will 


Free memory 570043 


ta 
¢ 


ise > ¢ 
defining key 


Start-up, from initial loading: 
through manipulating the 
sample files is included with 
the program, with which 
those new to database 
systems may acquire initial 
practice. 

screen menus and the 
facilities supplied by each 
option, in addition to more 
detailed menu structure 
descriptions, will take you 
through the various options 
of file ordering by any of a 
large number of parameters. 

Concise instructions for 
setting-up any of 15 printer 
drivers. 

In summary, the Ark 
applications of the Psion 
Archive module are 
outstanding. As if the 
user-friendly presentation of 
the program was not 
sufficient, the exceptional 


Keydefine. An unlimited number of applications 


continue to find relevant 
points overlooked on earlier 
readings. 

Divided into distinct 
sections, the Ark systems 
documentation covers every 
aspect of operation, often 
going into great detail 
regarding background 
information. A typical 
sampling of the index 
structure reveals such topics 
as: 

The description of the 
individual files pertaining to 
each program in the system. 

A glossary which explains 
intelligently the jargon 
pertaining to database files 
and operation. 

A system tutorial which 
explains what is happening 
at each stage of operation, 


manual is well-thought-out, 
superbly presented and well 
worth the reasonable price 
of the package. 


A QL utility with an 
unlimited number of 
applications, Keydefine must 
receive top marks and could 
well prove to be the most 
useful utility package of the 
year. If you have had an 
Opportunity to use the 
program you will probably 
wonder, as I have, how you 
ever fared without it. A 
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virtual library of defined key 
programs may be made up 
for particular applications, 
with up to 2K — 2,000 
characters — of text, Basic or 
control codes placed on 
each of 41 keys — assuming 
you have adequate memory 
capacity — and may be used 
from within other programs, 
such as any of the Psion suite 
or most SuperBasic 
programs. 

Supplied with three 
separate versions using keys 
defined for use with 
SuperBasic or assembler 
programming, and another 
for use in Quill, the program 
includes a routine to make 
other versions by EXECing 
the define module. 

Other features of 
Keydefine include the 
option of loading a file- 
handling utility which, in 
keeping with the services of 
the main program, defines 
keys for use with obtaining 
directories from any defined 
drive, job information, a 
utility printer spooler and a 
routine for utilising a help 
file or, where none is 
available, writing custom 
help files for use in your 
own programs. 

Paragraphs for standard 
letters or forms may be 
placed on individual keys. 
Where a variety of 
specialised letter or contract 
types is required, several 
versions of Keydefine may 
be made and loaded from 
either the Quill boot or 
prior to loading Quill. 

A multi-tasking 
program, Keydefine will run 
alongside the majority of 
other programs, including 
screen editors, and is 
accessed by using <ALT> 
along with the relevant 

‘defined key. 

One of the most important 
aspects of a program of this 
nature is the clarity and 
presentation of the 
documentation and in this, 
like the program, Keydefine 
must be rated highly. The 
well-written instructions are 
laid out logically and to the 
point. 


_To obtain the maximum — 


benefit from Keydefine, you 
must first decide what 
particular applications will 
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be applied to the keys. That 
will probably also require 
keeping a key catalogue. 

Keydefine represents 
excellent value for a 
genuinely useful and 
powerful utility. Of 
particular interest for 
professional programmers, 
Psientific Software will 
permit the use of its routines 
in commercial software free 
of royalties with the one 
proviso that they are not sold 
in competition. 


If the idea of making your 
own MacIntosh-type screen 
appeals to you, the first of 
the two offerings for this 
month’s Source File from 
Eigen, Windows, Icons and 
Fonts, is a multi-purpose 
utility which will provide 
finishing touches to your 
programs. 

Consisting of a set of 
routines of procedures and 
functions, it includes 
sub-routines which may be 
used independently and so 
will be dealt with as if they 
were separate programs. 

The fcon utility will 
produce up to 32 icons per 
file which can be linked toa 
SuperBasic routine to call 
and utilise any commands 
attached to them. During the 
design stage, each icon is 


Paragon from Eigen 
drawn on a 22 x 22 square 
matrix. As individual icon 
designs are completed, the 
new icon is stored in 
memory until all design 
work is completed. The 
entire set of new icons may 
then be stored as either a 
Microdrive or disc file. 

In use, each icon is 
paged successively with the 


Windows, Icons, Fonts, WIFS? 


<SPACE> bar and selected 
individually with the 
<ENTER> key. It is this 
application, which is at 
variance with the more usual 
practice of selecting an icon 
from any number of others 
by the use of the cursor keys, 
which may take some 
understanding. 

The Windows routine 
utilises seven new keywords 
for controlling and 
manipulating screen 
windows. Especially useful 
are the commands for 
moving the opened windows 
round the screen, restoring 
the original background; 
simultaneously the SWAP 
command is utilised for 
switching superimposed 
windows and is addressed — 
by individual respective 
channel numbers. 

Fonts will re-define any of 
the 256 characters of the QL 
repertoire but, for obvious 
reasons, use of the new 
character numbers should 
be limited to character 
numbers 128 to 255. Eigen 
recommends sensibly that 
the 0 to 127 character 
numbers should be left to 
their normal use. 

Some possible uses of 
individualised character 
fonts, besides the more 
usual custom alphabet/ 
number set, can include a 
type of simple animation or 
defining graphic symbols 
which can be called by letter 
association for use in games. 

The second of the 
programs, Paragon, is 
intended mainly to minimise 
desk clutter. A number of 
useful facilities have been 
included which can be 
incorporated as a multi- 
tasking utility along with 


other programs such as 
Quill or almost any other 
program which does not 
claim every bit of available 
memory or is designed not 
to allow multi-tasking — 
there are still a few of those 
around. 

Two types of screen 
calculator are provided — a 
simple floating point 
standard function calculator 
and a specially useful and 
powerful technical 
calculator which uses four 
interchangeable modes, 
Scientific, Statistical, Binary 
and Hexadecimal. 

Other Paragon features 
include an eight-page 
notepad, a month-at-a-time 
calendar which may be 
paged forwards or 
backwards by months or 
years, a clock which includes 
an alarm facility for 
appointment reminders, a 
caps lock indicator — the 
position of which may be 
user-defined —and a display 
control which will switch off 
the monitor display during 
stand-by periods. 

Overall, I felt the 
programs were reasonably 
good value. Eigen has 
produced a set of practical 
and helpful routines which, 
if utilised to their maximum, 
will eliminate a considerable 
amount of drudgery from 
keyboard entries. 

I felt that the use of the 
icons would have been 
better served if they were 
addressable with the cursor 
keys. If all 32 icons were 
used, for example, being 
confined to paging-in a 
single direction through 
each one could occupy a 
considerable amount of 
time. 
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wes! =PROFESSIONAL ASTROLOGER 


By Elmar Duensser 


An amazing new Astrology System, for both beginners and experts. It comes with a large and fully comprehensive A4 manual — no knowledge of 
astrology at all is required. This package will allow you to not only obtain an extremely detailed personality/character delineation (typically 6-9 
pages of single-spaced Ad text!!), but also to get individualised text interpretations for predicting ahead, both on a year-to-year and on a day-to-day 
basis. The entire system occupies 4 microcartridges with 300K of text data — diskette users get even larger files. And the system does 
synasiry/compatability testing too, with automatic text readout! We've thought of everything this time! 

“The most powerful & complete astrology package on any micro. ... provides everything that a present day Nostradamus willneed.... the ultimate 
astrology package. ... a 5-Star (#<++<%+) program — a Sinclair User Classic (the highest award given to any program)” SINCLAIR USER 
* A £10 discount is available to owners of Super Astrologer who send in the insert card with their order. This special offer expires 3ist August 1986. 

** An Astronomer module is available to users of Professional Astrologer. £7 if ordered with Prof. Astrologer, £10 if ordered later. The module has: Moon/Venus/Mars faces, 
declinations, eclipses (exact display), actual Planetarium view for any time, date & location. Choice of 5 coordinate systems. Solar system display from outside/inside system, 
with zoom, autoincrement, variable position, etc. 


Super Astrologer Professional 
Features deluxe Astrologer 


Automatic House Calculation * * 

Text files for House Interpretation 31K 70K+ 
Automatic Sign Calculation * * 

Text files for Sign Interpretation 37K 80K+ 
Automatic Aspects Calculation * * 

Text files for Aspects Interpretation 30K 7OK+ 
Graphic print of Natal Chart Not proportional Proportional 
Interpretation uses ASC + M.C. = * 
Calculation Accuracy this century Within 5 mins. Within 1 min. 
User Definable Astrological Character Set * 


User-Modified Interpretation files with 
AND/OR logic — full screen editor 


User Definable Printer Driver 
Output to Screen/Printer/Microdrive/Disk 
Automatic Progression Calculation 


Text output for Progression Interpretation 
allowing Year to Year horoscopes 


Automatic Compatibility Calculation 


Text output for Compatibility Testing allowing 
automatic comparisons between individuals 


Automatic Transits Calculation 


Text output for Transits Interpretation * 
allowing Day to Day horoscopes 


; a User-Definable House System * (6 defaults) 
“Succeeds v : User-Definable Aspect Orbs * 
certainly will Text & Defaults Editor programs SuperBASIC Micode 
eas f ee : : “NOT” facility in Interpretations = 
on any other hoi Q bes Selective “ANYTHING” facility (eg; 
Z anything in Third House Biquintile = 
anything in Aries) in Interpretations 

Batch printing/processing = 
Narrowing/widening/Stationary Aspect indicator = 
Sample Birth data files 20 
Birth data file compression = 


SINCLAIR USER CLASSIC 
kkk k £49.95 
NEW 20 Ad MANUAL 
LARGE A4 MANUAL 


THE DEFINITIVE QL GRAPHICS PACKAGE 
By Charles Southey 


We would love to tell you all about this superb system — but space is short. Take it from us, we've looked at every single graphics & CAD program available on the QL 
(£49.95 systems included!) and combined their best features with our own ideas. The result... EYE-Q (yes, it is intelligent). Design your own full colour screens with 
complete ease — ALL the features are here. Fully driven by pop-up menus * single key entry * several zooms * windowing * proportional movement * paint/fill * 
rubber bands x arcs * ellipses circles * lines * files * replicable sprites * horizontal & vertical stretch * reflect * invert * transfer * pan/scroll * undo (ie; whoops!) * 
font design editor x automatic anti-aliasing * graphic screen compression offset display * on-screen help * XOR/OR cursor with variable width * paste * recolour * 
magnify * reduce * text inclusion * freehand movement * localised save/load/scroll/pan/recolour/zoom x integral sprite editor x full range of QDOS colours & stipples 
available through paintbox * user-definable defaults . . . If you already have a graphic system, throw it out. Eye-Q is in aclass by itself, a state-of-the-art program from the 
people who brought you Sprite Generator & SUPERCHARGE. The system is supplied complete with a fully comprehensive A4 manual. Fully compatible with 
SUPERCHARGE, joysticks, mice &, of course, Sprite Generator. 


£24.95 COMPLETE WITH EXTENSIVE DOCUMENTATION 


Features QDRAW/GRAPHIQL EYEQ Features ; QDRAW/GRAPHIOL 
‘Freehand? cursor drawing x Sal Full screen reflection * 

8-directional movement x * Full screen inversion 
Variable-width cursor x * Full screen stretches 
On-screen text inclusion = ¥: Full screen recolour 


8 Character sizes = = * Full screen scrolling/panning 

All QDOS colours available Only solid colours Full range of under cursor-key control with 

colours & stipples wrap-round OR edge deletion 
* 


Paintbox colour selection = Local area transfer 

Fully menu-driven = * with reversal 

Zoom-in X4 & X16 * * with inversion 

Fill facilities Only solid colour fill Any colour fill with stretching (hor. or vert.) 
Rubber banded lines * Localised scrolling/panning as above 
Rubber banded arcs Localised recolour 

Rubber banded circles Localised/Full screen size reduction 
Rubber banded ellipses Access to HI/LO resolution within program 
Rubber banded boxes Integral character editor 

Full file operations Screen Compression 

Localised area load/save Monochrome Save 


SUPER SPRITE GENERATOR V3°5 

By Roger Woodhouse ee 

100% flicker-free — up to 256 multicoloured sprites in 256 planes with up to 16 different shape frames each. Mouse/Joystick/Keyboard compatible, Automatic 
collision-detection, individually variable speed, hundreds of special effects (including freeze frame, invert, reverse, ghostly sprites, sprite drawing in background, 
preprogrammed sprite library). Controlled by easy keywords, directly from BASIC or from machine code. No specialised knowledge required — we provide everything with _ 
So ee this GAMES DESIGNER. Fully compatible with SUPERCHARGE. : : f 
: This is what the press had to say about Super Sprite Generator: : : 
“A well-designed & carefully planned utility — invaluable ~— simply excellent” QLUSER 
: “The sprites produced are very good" POPULAR COMPUTING WEEKLY 
: “Excellent” THE U.S. QL REPORT 

“The results that can be achieved are excellent” ELECTRONICS & COMPUTING 


Most QL games on the market are written using Super Sprite Generator .. . now you can get the same effects! 
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seller lie 
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£24 9 5 COMPLETE WITH EXTENSIVE DOCUMENTATION 
or £19.95 if ordered with Eye-Q, SUPERCHARGE or Media Manager 


SINCLAIR USER 


SINCLAIRUSER CLASSIC —_ ss @ws _ arercrer] ar 
eee SUPERCHARGE V1.18 W@siie 


By Simon Goodwin, assisted by Gerry Jackson 
: THE OMPLE SUPERB ASIC : “The arrival of this product is a significant event for the aL ashould help many 


people produce quality programs with a fraction of the effort machine code 
requires, and many times faster than BASIC. I found the compiler easy to use. I 
have no hesitation in recommending SUPERCHARGE” QL USER/AL WORLD 


“Supertast, Super compact and Super flexible — produces minor miracles —a 
ly muioseng stand-alone machine superb utility — a 5 star (#33) program — a Sinclair User Classic (the highest 
code that eae he erat On standard PCW benchmarks, SUPER- award given fo any program)” SINCLAIR USER 


: “The best professional applications package available... extremely 
at running speed improve- impressive... the quality speaks for itselt’ POPULAR COMPUTING WEEKLY 
. 2 coe syntax of ae  . : S 


- 5 UPERCHARG Is Cae) close to being a 
10) oe is simply dramatic... the final 
_ SUPERCHARGE Teally shows that 
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An essential program for anyone who uses microcartridges and/or disks to store things of value! No more need you fear for the safety of your programs & data. Super Media 
Manager provides a host of device management tools in one integrated, fully menu-driven unit — an unbelievable 350K of programs! 


* Selective directory, copying, and erasing of files * Direct file copying from other disk formats (PC-DOS, MS-DOS, CP/M, Acorn DFS etc, 
* Sector loading and viewing (cursor controlled) etc} — sector copying to other disk formats. 
* Sector editing — Hex. and ASCII input allowed * Text file translation utility 
Automatic reports when mapping sectors — expands tabs, converts CR/LF to LF intelligently: converted files may be 
* Sector copying to sector, file, device etc. imported to Quill. 
* Viewing, printing, or saving of drive map details * Disk sector editing for both OL & non-QL disks, with all the usual features 
* Automatic (semi-auto on disks) recovery of deleted files * Full error reporting with automatic recovery 
* Bulk recovery of corrupt files to new files. %* Hexadecimal calculator 
* Header block or Disk type information display * System configuration 
* String searching by sector or file — ultrafast * Full directory sort facility, by name/size/type/date etc 
* Formatted print utility * Fully compatible with SUPERCHARGE 
and much, much more : 
a ee Ls... o_o ae Talent Super 
Features peas ’ te Mi a Manager ________s Cartridge Doctor Media Manager 
Automatic file recovery _ Sector copying 
intelligent directory handling Header block reporting 
Sector editing Drive Map reporting 
String searching (3 types) 
Formatted print utility 
Selective directory/copy/delete 
Intelligent directory sorting (multiple criteria) 
Printer echo facility 
PLUS ALL THE DISK FEATURES (Cartridge Doctor has none!) 


Super Media Manager is supplied complete with an 80+ page A4 User Manual. 


File block salvage 


Joe) ot] oe) oe] ot] oe oe] 


Text file format translation 
Sector viewing 
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£ 3 @. @ 3 < COMPLETE, or £29.95 if ordered with SUPERCHARGE 


ER ARCADIA By Dere! jones 8 Jan Rob 
Lee o : levels, 3 modés, switchable evaluation aes, dual clocks, help cay 
_ £9.95 FOR TWO HYPERSPEED GAMES! i 2ys alll the rules, Understands both strategy and tac! 


SUPER MONITOR + DISASSEMBLER V3.0 
By Keith Poole 


: Anextremely compact, powertul, feature-filled, SUPERCHARGE compatible 
__ Tachine code system — an essential for anyone who wants to write or 
un 


* SUMMER BONUS - You may deduct £2 from the total price if you buy any 2 programs, £4 if your buy any 3 programs, £6 if you buy any 4 programs and so on. (These offers do not 
apply to upgrades). 

* Gras homens are welcome. Please add £1 (£2.50 for programs over £25) per program for orders from Europe and £1.50 (£4 for programs over £25) per program for orders from 
other countries, to cover airmail postage and packaging costs. Cheques from abroad should either be drawn on a UK bank or be Eurocheques — if you are unable to obtain either of 
these add £5 to your order price to cover cheque clearing charges. 

* Ifyou have an early version of one of our programs, send the microcartridge(s) (not the packaging) to us accompanied by £5 (£10 if SUPER ASTROLOGER or over £25). 

* Allour software is 100% compatible with all memory expansion & disk systems. 

* Programmer & dealer enquiries are welcome. Demonstrations of all our programs are available at Micro Anvika, 220A Tottenham Court Road, London. 

* SUPERCHARGE+ICE is available for £79.95 — or £89.95 with CHOice too! Special prices on all EIDERSOFT programs — just phone us. 

* All our Software is compatible with the THOR & QLT machines — we guarantee to support the QL & QL compatible market through 1986 & 1987 at the very least. 


Be ee eo Ee aa ee 


To: DP, 222 THE AVENUE, LONDON E4 9SE . 
[Or use the Credit Card Hotline @ 01-527 5493] MDIGITAL PRECISION 


Please rush me oe — if 


Name: : Address: 
_ Post Code: 
“Enclosed [ |Cheque [| |Cash [ ]P.O. [_]Access/Mastercard [| Visa/Barclaycard 
forthe amountor= ==. Number: Expiry date 
I Signature: : 


Please indicate if you have: a 34" disks [_] 514" disks. If so, do you get [ _]720sectors [_] 1440 sectors ? 
“THE ONLY SOFTWARE HOUSE DEDICATING ALL ITS RESOURCES TO THE QL” 


This month Mike Jam 
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working spreadsheet “is 
essentially a collection of 
formulae in the proper ar- 
. rangement but on the way 
: O a working spreadsheet 
Abacus commands are the main tools 
for putting the formulae into shape. 
There are times, however, when the use 
of Abacus commands can be central to 
the operation of a spreadsheet. In this 
article we look at some of the more 
interesting Abacus commands and 


_ continue the exploration of functions 


started last month. 

At any time during the construction 
of a spreadsheet you can press the F3 
key and see a full list of Abacus 
commands. You can then select the 
command of your choice by typing the 
first letter of the command name. In 
most cases Abacus will then offer you 
convenient defaults for the remainder of 
the command. If they are suitable, and 
they are in a surprising number of cases, 
pressing ENTER will set the command 
in action; if not, they can be altered by 
editing in the usual way. 

Once you have used Abacus for a 
few hours the commands become so 
familiar that there is no need to have 
them displayed at the top of the screen 
and the space is better-used to display 
a larger portion of the spreadsheet. To 
remove the prompts, press F2; pressing 
it a second time restores them. 

There are two commands intended 
specifically to allow you to modify an 
existing spreadsheet to correct or ex- 
pand it. The Amend command can be 
used to modify a cell entry. When the 
command is selectable the contents of 
the current cell are copied to the input 
line and you can edit them just as if you 
had typed them in. That is useful for 
correcting any mistakes made to text 
and values during spreadsheet con- 
struction but extra care has to be taken 
when editing a formula, as the effect it 
has depends on how it was entered. 

If you edit a formula which was en- 
tered as part of a set of formulae either 
using col=, row=, Echo or Copy, any 
changes you make are also made to all 
the copies — modifying one of the set 
modifies them all. On the other hand, 
modifying a formula which has been 
typed into a single cell changes it, and 


- formulae without altering the remainder. 


ly it, even if there are similar formulae 
in the spreadsheet. That can cause dif- 
ficulty if you want to change only one 
or two of a partial column or row of 


You cannot use the Amend command 
because that will change all the formalae 
each time you change one of them. The 
only solution is to re-type the formula 
with any modifications necessary for 
each cell needing to be changed. 

The Grid command can be used to 
insert or delete rows and columns and 
in that sense it is really the only com- 
mand which edits the entire spread- 
sheet. After selecting Grid you are then 
asked to select one of Delete, Insert or 
Width. If you select Delete you can 
delete a range of rows or columns. De- 
leting is really a moving-up of rows or 
columns to replace those being 
removed. If you delete column B, all the 
columns to its right move one place to 
the left, i.e., C moves to B, D to C, and 
so on. At the edge of the spreadsheet 
empty rows or columns are moved in 
as required. Deleting column B also 
moves an empty column into BL. Insert- 
ing rows of columns works in roughly 
the same way, in that empty rows or 
columns are introduced into the spread- 
sheet but in the area you specify rather 
than at the edges. 


Inserting column B introduces an 
empty column in place of the existing 
column B and moves everything one 
place to the right, i.e., the contents of 
column B moves to C, C to D, and so 
on. 
At the edge of the spreadsheet, of 
course, the content of rows or columns 
being moved is lost. Inserting rows or 
columns does not make the spread- 
sheet any bigger. It is also important to 
realise that inserting or deleting rows or 
columns does not affect any of the exist- 
ing formulae, since they are adjusted to 
retain their original cell references. I 

If column A contained the formula | 
B1+C1 and you inserted anew column | 
B, the formula in column A would be 
altered to read C1+D1. 

Most of the Abacus commands are | 
concerned with the way a spreadsheet \ 
is presented. In particular, the Justify \ 
and Units commands are concerned \ 
with the way. values are displayed. The \ 
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Justify command alters the pdsition 
within a cell at which a value is displayed 
— Left justified, Right justified or Centred. 
The important thing to realise about this 
command is that the default justification 
is applied to values as they are entered 
or computed. 

You can use Justify to alter the current 
default justification or to re-justify exist- 
ing values — Default or Cells options. If 
you alter the default justification, no 
changes will be made to existing values, 
i.e., they will be displayed with the old 
justification. If you select the Cells op- 
tion, values in a specified range will.be 
re-justified but any new entries will still 
be justified according to the default set- 
ting. 

That is. one of the few limitations of 
Abacus when compared to other 
spreadsheets, which generally allow a 
justification to be specified separately 
for entry to each cell if desired. 


If you have a column of figures in an 
Abacus spreadsheet which you would 
like to centre while leaving all other num- 
bers right-justified, you would use the 
Justify Cells option. That would centre 
all the existing entries in the column but 
if you entered additional values they 


would be displayed as right-justified, so . 


ruining the layout of the column. 

The Units command can be used to 
alter the way numeric values are dis- 
played. The display format can be any 
of Decimal, Integer, Exponent, Percent, 
General or Monetary. Selecting any of 
those display options does not alter the 
value stored in a cell and that can some- 
times make Abacus calculations appear 
incorrect. For example, if A1 contained 
38.5 and B1 contained 2.5, displaying 
them in integer format would result in 3 
and 2 respectively but if the formula 
A1+B1 were stored in C1 it would dis- 
play 6, not 5 as you might expect —i.e., 
3.5+2.5=6 rather than 3+2=5. 

Another difficulty with the Units 
command is the Default or Cells option 
described for the Justify command. The 
way a value is displayedis determined by 
by the default command. The way a 
value is displayed is determined by the 
default setting of the Units at the time 
it is entered. Changing the Units of a 
particular cell or set of cells only alters 
their current contents — not any 


though 


su nt entries in the column. If you 
set a column to monetary format but the 
default is still General or Decimal, any 


‘additions you make to the column will 


spoil the column layout. 

Many of the options in the Design 
command are concerned with the way 
the spreadsheet looks but many are 
also concerned with the way it operates. 
The most useful is the Blank if zero op- 
tion which makes all cells containing 
zero print as blanks. 

Many users are puzzled by the exis- 
tence of two commands concerned 
with the replication of cell contents — 
the Copy and the Echo commands. Al- 
similar superficially each 
command has a different job to do. 
Copy will make one-to-one copies of 
partial rows/columns or blocks, i.e., the 
result of a copy command contains. as 
many cells as in the thing being copied. 

You can copy the contents of a single 
cell to another single cell, a partial row 
of six cells to another partial row of six 
cells, and so on. Copy makes an exact 
copy of part of the spreadsheet at 
another position. Echo, on the other 
hand, will make one-to-many copies of 
a single cell — you can use Echo to take 
the contents of a single cell and replicate 
them into a partial row/column or block. 

You can Echo the contents of the first 
Cell in a column into all the other cells 
in the column. Notice that when you 
Copy or Echo formulae the result de- 
pends on whether the formulae contain 
relative or absolute cell references. 

Copying A1 containing B1+$C1 to 
D1 results in E1+$C1; the relative cell 
reference B1 means ‘the cell to the right’ 
but the absolute cell reference $C1 
means C1 no matter to where it is 
moved. 


Two: of the most important aspects 
of the way a spreadsheet operates are 
when re-calculation is carried-out and 
in what order. Normally the entire 
spreadsheet is re-calculated each time 
you make an entry but that can take 
time and so to speed data entry you 
can use the Auto-Calculate on input op- 
tion of the Design command to stop 
re-calculation on each entry. You can 
force re-calculation when you have 
finished entering data or at any other 
time by using the Xecute command. 


There are some spreadsheet designs 
where the values shown are not correct 
after a single re-calculation and so you 
might have to force re-calculation using 
the Xecute command more than once, 
perhaps even a number of times. The 
reason for the need to re-calculate is 
tied with the order in which calculations 
are performed. 

Normally all the values in a spread- 
sheet are calculated in row order. Row 
one is calculated from A1 on, then row 
two from A2, and so on until every cell 
has been calculated. That is satisfac- 
tory so long as formulae refer only to 
cells above and to the left of the cell in 
which they are stored. If a cell contains 
a formula which refers to a cell below, 
there is a chance that when it is 
evaluated the cell below will contain an 
incorrect value because it has not yet 
been re-calculated. 

By using the Xecute command you 
can force an additional re-calculation 
which probably will mean that the for- 
mula will be calculated correctly be- 
cause the cell below will, the second 
time around, contain a correct result. If 
you are in doubt about the correctness 
of your spreadsheet because of prob- 
lems of re-calculating order, the best 
thing to do is to use the Xecute com- 
mand until it produces no changes in 
the spreadsheet values. 

There are situations where re-calcula- 
tion always produces a different result, 


Continued on page 34 
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no matter how many times you force it. 
If you enter into A1 Ai+1, each time 
you use Xecute the value stored in Al 
increases by one, |.e., Al counts the 
number of times the spreadsheet has 
been calculated. If you would like to see 
something a little more interesting, try 
col=A1+A2 FROM 2 TO 255 and then 
enter 1 inA1 and repeatedly re-calculate 
the spreadsheet. Also try col=A1+1 
FROM 2 TO 255 and then enter A255 
in A1 and you will find that your spread- 
sheet can count forever. 

Very often the need to re-calculate 
can be avoided by using Design to alter 
the order of re-calculation from row to 
column. If the columns are calculated 
first, formulae which refer to values 
below and in columns to the left will give 
the correct value the first time they are 
calculated. An example can be found in 
this month’s sample spreadsheet. 

The Order command will sort the 
rows of a spreadsheet into an.order de- 
termined by the contents of a particular 
column. The Order command is very 
useful if you need to use a spreadsheet 
to look-up anything. If you are keeping 
a list of names and addresses as part 
of a spreadsheet you can use the Order 
command to sort them into alphabetical 
order by name and thus make it easy 
to find any entry. 

For columns of figures you can use 
the Order command and the look-up 
function to find any entry automatically. 
Suppose your commission on sales var- 
ies according to total sales — less than 
£100 0%, £100-£500 1% £500-£1 ,O00 
3% and more than £1,000 5%, you 
could set up a look-up table as follows: 


To find the commission rate using the 
table all you have to do is look down 
column A until you find the biggest value 
which is less than equal to your sales 
and your commission rate is in the same 
row in column B. 

If sales =£250, the largest value less 
than or equal to £250 is in A2 and so 
your commission rate is in B2. You can 
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achieve the same result auiomatically 


using the Look-up function. Lookup 
(A1:A4,1,sales) will search the column 
A1:A4 to find the largest value which is 


just less than or equal to sales; it then - 


returns the value in the next column as 
the result. 

The first value in the look-up table is 
a dummy value and its corresponding 
entry in the next column is less than the 
second entry. In that case any value less 
than 100 results in Look-up returning 
0%. The general form of the look-up 
function is: 
lookup(range, offset, value) 
where range defines a partial row or 
column, offset is the number of rows or 
columns separating the two parts of the 
look-up table and the value is the 
quantity searched for. 

If you would like to try the foregoing 
look-up table, enter lookup(A1:A4,1,C1) 
in D1 and then try entering different 
values for sales in C1. In general, the 
look-up function is very useful but it as- 
sumes that the look-up table is sorted 


B Cc 
Tel. No. = 01-293-099 
Names Number 
01-747-384 
001-838-111 
001-293-099 
01-938-337 


into order on its first row or column and 
that is the connection between the 
Order command and the look-up func- 
tion. 

The only difficulty with the look-up 
function is that it will work only for 
numeric values and will not detect exact 
matches. That means that you cannot 
use it for searching lists of names for an 
exact match. That raises the question 
of whether it is possible to achieve that 
in some other way. 

This month’s example spreadsheet is 
telephone directory where you enter 
someone’s name and Abacus will give 
you the telephone number. That is 
achieved effectively by searching a look- 
up table of names and numbers for an 
exact match and then returning the cor- 
responding telephone number. 

The same techniques can be used to 
look-up any word or number in a table. 
The fundamental idea is to enter into 
column A (from A3 to A15) the formula 
col=if ($A1=B3,row(),0) FROM A3 TO 


Fred 
Mike 
Steve 
John 


A15. That checks to see if the entry in 
cell Ai is the same as the next-door cell 
in column B. If itis, the number returned 
is the row number the formula is in and 
zero otherwise. Thus if you enter a list 
of names in column B and the name for 
which you are searching in A1, the rest of 
column A will contain zeros apart from 
the row where there is a match between 
the contents of Al and an entry in 
column B. 

If we now work out SUM(A3:A15) it 
will give the row number of the match, 
no matter where it is. That row number 
can then be used in the function 
index(c,r) which will return the contents 
of the cell at column c row r. Thus, if 
the telephone numbers are stored in 
column C alongside the names, the for- 
mula index (3,SUM(A3:A15)) entered 
into C1 will ensure that the telephone 
number of the current match is always 


Having invented the formula to do the 
job, all that is necessary is to tidy the 
spreadsheet . Enter Tel. No = into B1, 
Names into B2 and Number into C2 for 
headings. The entry of the name to be 
found can be made slightly easier by 
using askt(“name=") in A1 so that each 
time the spreadsheet is executed you 
are prompted automatically for the - 
name. 

One difficulty you may have with en- 
tering the formulae is a !ITYPE error 
which causes Abacus to refuse to enter 
the formulae. The solution is to enter 
blanks or null strings to initialise all the 
cells in columns A, B and C to text 
values before you begin. 

To make it work without repeated re- 
calculation you have to alter the order 
of calculation to column order so that 
all the formulae in column A are worked 
out before the formula in C1. Also to 
make the spreadsheet easier to use it 
is worth setting zero to display as blank, 
switching-off Auto-calculation on input 
and using the Order command to sort 
the names in column B to make manual 
look-up easier. This idea for searching 
a spreadsheet is worth experimentation. 
@ Next month, in the final part of The 

Abacus Art, Mike James will cover 

Printing, Booting and Exporting. 
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offer GIN we 
to the microdrive 


Specially designed to fit neatly into the case of the Sinclair QL, the MCS-Disc Interface Board 
and companion disc drives are colour-matched to complement your QL computer. 
The MCS (Micro Control Systems) disc interface with the offers have zero K of RAM. For 256k of RAM please 
add £99 inc Vat and for 512k of RAM please add $189 inc Vat. : 
The 256k and 512k versions also include a centronics printer interface with lead and toolkit on ROM. 


Power sy 
formatte 


WUD YMG, 
YY MY Uy 


Prices correct 
of time of 
going to press, 
Offers subject to 
availability, 


Visit our Showroom 
Open Monday — Friday 
9.30 — 5.30 
Saturday 9.30 — 2.00 


All drives are compatible 
and ready to plug in and use with all currently Carriage — eee eee eee es 
avaliable QI Disc Interfaces. When bought | | Piease add 12.00 © post to: VIGLEN COMPUTER SUPPLIES 

with the MCS-Disc Interface, they are ready to carriage for disc drive, | Unit 7, Trumpers Way, Hanwell W7 2QA 


plug in and use. €8 for printers and © Credit card holders may order by telephone on 01-843 9903 
monitors, £3 for printer 


H stands. i Please send me 
Other peripherals forthe QL | | enclose Cheque/P.O. for sincluding carriage. 
MONITORS philios Monochrome G Unit 7, Make cheques payable to Viglen Computer Supplies. 


Model BM7502 issuiinnninnannansnies £85) trumpers Way 
Phillios Monochrot u I Name: 
MOdel BM7522 orerunnsinninsssnennsnnnn £95) Hanwell W7 2@A. : 
Phillips Colour : = 
Fes Gotu 1 £199] Tel: 01-843 9903 ff... 
=a Phillips Standard atkSaiogs non __ 
Colour Monitor CM8501_.. 0 
Taxan Kaga KP8 10 
Canon PW1080A .... 


PRINTERS © outen Data Daisy Wheel Printer 


I | prefer to pay by ACCESS/BARCLAYCARD (delete one). 


Credit Cards valid only 


] if signed by card holder 
Card No: Address must be the 


Serial fo Centronics Interface 
lead for AbOvE PFINteLs cee 


Perspex printer st 
80 col, printer 


same as card holder. 


I Signature: EN= QL/8 


136 col printer .... 
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SOFTWARE APPLICATIONS 


Adam Smith looks -back 
on his investment in the 


QL and asks “was it worth 
fhe” 


s it worth £2,000? That is what 
my QL system has cost me, so far. 
The initial cost estimate of £1,000 
has gradually been exceeded to 
the tune of 100 percent. If | were 
in the market now, however, the same 
system would cost only about £1,400. 
As just a home computer, that is too 
expensive for most people but for a bus- 
iness user, itis not a great deal to spend. 
Reclaim VAT, then get capital allowance 
against tax for the remainder, and the 
out-of-pocket amount is only about 
£850. 

The Sinclair £4 million advertising 
campaign in 1984 netted me. | had 
given up the idea of buying a computer 
but the QL specification and price fired 
me again. W. H. Smith provided the QL 
and the Cub 653 VDU and, later, the 
Kaga Taxan KP-810 DMP printer. The 
Cub and the Kaga have proved 
excellent and free from trouble; | am glad 
| decided in favour of colour and 
medium resolution, and extended print- 
ing facilities. 

It was fortunate | went to W.H.S. be- 
cause | badly needed after-sales service 
for the next six months; the first two QLs 
were taken back within days or weeks 
of receipt, and another was rejected in 
the shop. All suffered from Microdrive 
or lock-up trouble. The shop changed 
everything without quibble; the girls be- 
hind the counter went so far as to select 
the latest hardware levels for me —| have 
had DO9 to D14. 

Number 7 has lasted me for more 
than 12 months and appears to be a 


good one. It would be a lie to state that 
it has not locked-up, or has not had 
Microdrive trouble, but the lock-ups 
have been through straining the soft- 
ware, or caused by the add-on units | 
bought six months ago. | must have ex- 
changed about 30 Microdrive cartridges 
but the drives still work as well as one 
can expect. 


Reading the dozens of pages of crit- . 


ical notes | have made it would seem 
that | think everything is rubbish but that 
is far from being the case. | feel it is a 
good, working system, capable of doing 
far more than | have been able to put 
on it. 


The level of support from peripherals 
and software suppliers is now high and 
the prices are comparable with those 
for other computers. That old argument 
for buying many computers — “will run 
thousands of software titles” —has never 
applied to the QL and is just a red her- 
ring. 

So what costs £2,000? The combina- 
tion of QL, Cub 653 and Kaga KP-810 
with Miracle serial-parallel interface 
served me for 12 months. Having gone 
through the route of thinking first Quest, 
that CST and then Medic had what | 
needed, | found Eidersoft. From Eider- 
soft | bought a PCML disc interface with 
256K of extra external memory, 2 x 1MB 
Mitsubishi disc drives — 1/8rd-height, 
3.5in. — MP internal 256K extra memory, 
Sureshot joystick and Ice ROM. | hope 
a mouse will arrive shortly, together with 
its modified Ice module. 

Along with the hardware, | bought a 
few programs — QSpell, Archiver, 
CHOice — the tasking program for Ice 
— GraphiQL and KeyDefine. | must have 
had about 100 Microdrive cartridges but 
only 50 remain. 

The initial impact of the add-on 
hardware, and QSpell, was to reduce 
me to the state | was in during the first 
days after buying the QL, spinning 
wheels furiously and getting very mad. 
Lock-ups happened by the bucketful, 
the speller dictionary kept filling with gar- 
bage, | lost files through crashes — not 
a happy period. 

The solution to the crashes was to 
get a good copy of QSpell and not to 
try compressing the dictionary. The 
lock-ups appear to have been caused 
by the interface overloading the QL 
power supply; the £50 solution to the 
problem was to suppress’ every 
appliance in sight. 

If you have tried suppressor plugs and 
adapters and are still having lock-ups, 


try fitting Varistors to the mains plugs 
on all the system units and on all house- 
hold appliances which draw a high 
current when switching — e.g., freezers 
and refrigerators. Use the highest joule- 
capacity Varistor which will fit into the 
plugs; they are cheap — about £3 for 
five — so use them freely. 


All the hardware now works well. The 
discs and drives give no detected errors 
and no sectors are lost — and | co plenty 
of saving and loading. Two more mod- 
ifications could prevent much agony — 
open the QL case and drill about 100 
holes, 32mm. diameter, in the cover, 
directly above the heat sink to the rear 
of the Microdrives; fit another 7805 reg- 
ulator for the 5V supply to the chips 
above the existing one, using heat-con- 
ductive paste and a longer screw, and 
push the leads into the same connector, 
in parallel with the existing one. 

That combination should give more 
5V capacity, to cope with added 
memory, and much better cooling; apart 
from improving the 5V supply, the extra 
cooling should extend cartridge life con- 
siderably. The internal extra 256K is on 
a PCB which fits over the QL PCB, with 
no soldering being required; it works 
well and is not expensive. 

The Ice ROM and CHOice tasking 
program are almost as valuable to me 
as the disc drives. | am a Quill user 
primarily but | need to have a German 
dictionary available all the time when 
making translations and the solution has 
been to write a routine, based on 
standard mailing procedures which runs 
under Archive. Words | do not know can 
be checked in a few seconds by switch- 
ing from Quill to Archive. 

The housekeeping functions of Ice are 
still available with the program-tasking 
and | use them frequently. A recent 
improvement has been to _ load 
KeyDefine before the tasks; that permits 
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much faster selection of Quill operations 
— fewer keys for regularly-used func- 
tions — and fast checking of the size of 
individual files. QSpell has been an em- 
barrassment — it has found several 
dozen mistakes in documents which 
had already been sent to the customer. 
No document longer than about two 
pages leaves here before QSpell checks 
it now. | write service manuals and make 
translations, mostly concerned with 
domestic appliances, so | need Quill to 
work well. It is very slow in some re- 
spects but | like it overall and extra 
memory and disc drives make it much 
more usable 


My single documents now range up 
to 288KB in size — more than 40,000 
words — and saving takes no more than 
two minutes. Even saving to both drives, 
as | do normally is not too time-consum- 
ing. One advantage of 640K of memory 
is that | can usually forget about the 
dreaded def_tmp condition. Overflow, 
even on to disc, should be avoided if 
possible. 

If a Save fails and kills your document 
and file when you are using a def_tmp 
file, it is unwise to risk trying to save to 
your back-up file, because there is a 
good chance that will be killed also. Try 
saving to any empty cartridge/disc first. 
If that fails, it is worth attempting to load 
the def_tmp file, or Copy/Rename it to 
a —doc file and see if that will load. Or 
try printing to a cartridge/disc. 

My current Quill is version 2.35 and 
that can still catch you out when saving; 
it has caught me only once, though, and 
| still had one py left after it had 
destroyed two. 

Business peop. obviously do not 
spend all their day word processing. 
They need the calculating facility pro- 
vided by Abacus and the database from 
Archive. | find simple VAT recording and 
overall expenditure/profitability tracking 
easy with Abacus, without needing 
extra memory; a full accounts package 
would require more memory. My. at- 
titude is why buy just enough memory 
or drive capacity when the maximum 
available costs relatively little more?. 

The limited applications | use with 
Archive do not require extra memory but 
| have found that operations are much 
faster when Archive is allocated 186K 
— that is all it seems prepared to take. 
For example, when looking up words in 
my German dictionary, access is several 
seconds faster now than it was when | 
allocated only 20K to Archive. 

Speed has been the driving factor 
behind my purchases. It is difficult to 
remember how slow operations were in 
the beginning. So what saves time? 

Extra memory allows the Psion pro- 
grams to operate faster and reduces 
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the need for multiple files. In spite of the 
arguments in favour of external memory 
| have not identified any major difference 
in speed between the three blocks of 
memory in my QL when using the Psion 
programs but a combined disc inter- 
face/memory PCB is the easiest to fit. 

Disc drives allow much faster saving 
and loading, apart from being much 
more reliable than Microdrives and hav- 
ing much greater storage capacity; 
3.5in. x 1MB drives seem the best type 
to choose. 

Icon front-end, e.g., Ice. If you do a 
good deal of deleting/copying and 
would like to be able to look at files and 
date-stamp them, this is essential. 

Program-switching software, 
e.g., CHOice. If you need to use more 
than one program it will save much time. 

A daisywheel printer may give better 
print but it will be slow and will not offer 
quickly the printing facilities of a good 
DMP. 

If you are a Quill user, a good speller 
will do a better and faster job of proof- 


. reading than you are likely to make. 


Key definer. There are various pro- 
grams available which allow you to 
reduce the number of key depressions 


required for standard actions. That may 
be useful mainly for Quill users. 

Print spooler permits printing to be 
carried-out while editing is in progress. 
Unfortunately, | cannot claim to have 
found what | need. KeyDefine includes 
a spooler but it does not seem to be 
usable for me with Quill, as it does not 
use my printer-driver. 

Continuous stationery. For more 
than a year | have used scrap A4 paper 
for my rought prints and each sheet 
takes as long to load as to print. Now 
that | have continuous perforated paper, 
fanfold type, printing speed is about 
double. Check the size of the paper you 
buy; it seems most continuous station- 
ery is U.S. size, not A4. 

Using Quill. Scroll down, not up — 
the latter is much slower and can lead 
to lock-ups on basic QLs. Press F2 and 
get rid of the prompts, as commands 
work faster without them. Keep docu- 
ment formats on file; for example, a file 


. with just name and address in it, 


together with the appropriate Design 


BUSINESS SOFTWARE 


and Margin settings, and another for 
wide documents — anything wider than 
the screen reduces speed considerably. 
Call the appropriate file for the job being 
started — do not neglect to change the 
file name when saving. Use a key-defin- 
ing program to reduce the number of 
key-depressions for frequent opera- 
tions. 

Never allow a document to overflow 
if you can avoid it. Break the document 
into smaller files, because all operations 
are drastically slower once overflow has 
occurred — unless you can overflow to 


‘RAM disc. Leave any spelling checking/ 


proof reading and re-arrangement until 
the document is finished. Use the Re- 
place and Search commands, rather 
than GOTO Page x if your document is 
large, or if you cannot remember exactly 
the page number you need; you may 
well remember a_ particular word/ 
number on the required page, so just 
h for i 


Use of this command which may 
apply only to wide documents is finding 
the page required, rather than the one 
Quill supplies by GOTO; that may sound 
odd but Quill loses count of lines if you 
have a wide document; it counts cor- 
rectly as you scroll down from the start 
of the document but re-numbers the 
lines when you scroll back up. 

| number the pages manually — not 
by using Footer — and search for the 
end of the page before the one | want. 
When you have, say, 60 pages, Quill 
can be in error by perhaps five pages; 
always GOTO the top before saving and 
before scrolling down to check that the 
start and end of each page are where 
they should be. 

Allocate as much memory as can be 
spared when multi-tasking; Quill will 
take SOOK if offered it and only about 
half of that will be available for a docu- 
ment. 

Using Archive. Save your routines 
as _pro files because they load faster 
than —prg files but remember to Run 
Object “filename_pro”). Eliminate all the 
fancy information once the routines run 
well and you know how to use them; 
that saves space and speeds operation. 
Give the program as much memory as 
can be spared when multi-tasking. Dis- 
pense with the prompts before loading 
your routine; with CHOice, | find F2 will 
not remove the prompts after a routine 
is loaded — apart from reducing speed, 
the prompts alter the display area for 
your routine. 

To return to the opening question, | 
think it well worth the money | have 
spent. Perhaps | am biased, in that | 
hate typewriters; anything which could 
remove that mechanical monstrosity 
from my daily life is worth a great deal. 
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QL MONITORS AND TV/MONITORS 


REMOTE CONTROL SUPER VALUE 
16” MODEL 16CT2216 £322.00a Inc. VAT 

We can supply up to 26” TV/Monitors— please ring for details. 
ANTI-GLARE SCREEN * FREE 
HIGH RESOLUTION 

GREEN MODEL BM7502 FORGE WK OL 
@ £83.85b 

AMBER MODEL BM7522 
@ £85.10b 


COLOUR MONITOR 14” MODEL 
CM 8533 £289.80a. 


QL COMMUNICATIONS 


QCODE TERMINAL software 
Features: 
VIEWDATA TERMINAL — for PRESTEL and MICRONET 
* Split baud rate operation (75tx/1200rx) in conjunction with MODAPTOR (see below) 
— necessary for calling PRESTEL. 
* Can handle dynamic frames. 
* Full emulation of colours, mosaics, separated mosaics, etc. 
* Save displayed page to file on microdrive or disk. 
* Save entire session to file on microdrive or disk. 
* Replay, create or edit saved pages whilst off-line. 
+ Transmit a saved file. 
PLUS 
VT52 (Scrolling terminal) — for use with Bulletin boards, electronic mail services, mainframe 
computers, etc. 


* 80 column (4 colour), or 40 column (8 colour) modes. 
* VT52 control codes, for fancy editors, etc. 
x Additional control codes to set display colours. 
x Alternate keypad emulation. 
* Upload or download text files using standard utilities on host. 
* XON-XOFF protocol. 
PLUS 
* QLto QL file transfer. Any file transferred from disk or microdrive, including executable 
files, Quill documents, etc. 
* Error detecting and correcting protocol. 


QL MODAPTOR 

+ Links QL to 300/300, 1200/75, 1200/1200 modem. eg WS2000, PRISM 1000 & 2000, 
NIGHTINGALE, DATACHAT, VOYAGER 11. 

* Includes QCODE TERMINAL software. 

* State modem type when ordering if not 25 way connector. 


QCODE ASSEMBLER 


* with screen editor, fast M/c linker, & object library manager. 


QCODE GAMES. .......:sssersrersereseeen feseeenbkeckasnaeseswavnesucecnasveteees 


* 4 games: sprite, lander, wall-up, moon lander. 
PRISM Modem 1000 with modaptor & software 


QfLash RAM DISK 
+ Up to 8 devices. Fastest available! Fully QDOS compatible. 
* Speeds up any program that accesses microdrives or disks. 
* Use with unexpanded QL or any memory extension. 


QCODE 
42 Swinburne Road Abingdon OXON OX14 2HD 
Telephone: 0235 28359 
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SuperTOOLKIT 


FULL SCREEN EDITOR. PRINT USING. LAST LINE RECALL. ALTKEY. 
JOB CONTROL. FILE HANDLING. DEFAULT DIRECTORIES. EXTENDED 
NETWORK allows discs, printers etc to be shared between 

QL’S. New broadcast protocol included. Over 118 commands. 

Written by Tony Tebby. Toolkit on 16K EPROM + library rack + 
comprehensive manual. SuperTOOLKIT @ £34.50 inc vat p&p £2. 


* * NEW x* * CHARACTER FONT GENERATOR/EDITOR PLUS the following fonts E13B, OCR 
SUPERSCRIPT, SUBSCRIPT, LARGE AND SMALL ICON FONTS, ANIMATION FONT, UPPER 
& LOWER CASE OLD ENGLISH. for use with toolkit. @ £19.55 inc vat p&p £1. 
* * NEWx * RAM DISC SOFTWARE on microdrive @ £10.58 inc vat p&p £1. 
* * NEWx* * QL CROSS ASSEMBLERS 6502, Z80, 8048 series etc phone for details. 


DON’T BUY A COLOUR MONITOR!! 
HAVE YOUR 14” & 16” PHILIPS & PYE 


PHILIPS COLOUR 85 CHARACTERS COLOUR TV CONVERTED TO A TV/MONITOR 
TV/MONITORS PER LINE FACTORY 
MEDIUM RESOLUTION CONVERSION £80.50a 
16” MODEL 16CT2016 £294.40a Inc. VAT RGB KIT £57.50d 


* Resolution better than 585 x 450 pixels. 

* Image clarity comparable to leading monitors. 

* Includes RGB lead for connecting with BBC/QL. 

* Conversions carried out at our workshops within 2/3 days. 


By Post. Enclose your Cheque/P.O. made payable to CARE Electronics. 
HOW TO ORDER: ruse your ACCESS/VISA. Allow 7 days for delivery. Please add carriage. 
OPEN: 


800, StALBANS ROAD, WATFORD, HERTS. 


OL 


One £10.35c Inc VAT 
Five £34.50c Inc VAT 
Ten 57.50c Inc VAT 


Eprom Cartridge 


9am-5pm MON-THUR 
9am-4pm FRI/SAT 


a)@9.99 c)@1.00 wets 
b)@ 8.00 d)@2.00 


TELEPHONE: 0923672102 


wbDSoftware 


FOR THE SINCLAIR QL:- 

JOSS £15 on mdv or 514” fip, £17 on 314" fip 
Forget syntax errors and mistyped names in file commands! Just move a cursor 
and press SPACE. Cursor keys or joystick allow access to up to 8 microdrives 
and all the discs your interface will handle, with up to 150 files on each. Scroll 
& print directories, COPY, DELETE or PRINT any file, select TV or Monitor mode 
before LOADing/RUNning a program. Use keyboard only to set date or label a 
medium. Easy to use with Psion or other software. No silly icons to learn — 
JOSS will tell you what it’s doing! Mass copying/printing utilities and programmer's 
toolkit. Specify disc size, tracks and interface (CST, Cumana, PCML, 
MicroPeripherals) or microdrive only. 


REPOLT cccscssssersersssessesessesens £11 on 2 mdvs or 1 314” fip, £9 on 514” fip 
For use with ARCHIVE 2, contains 1300 useful references and a search/print 
program. Find programs, articles and reviews buried in the magazines on your 
shelf! Cheap updates of earlier editions. 


Mav Extension Cable (87 .....sccssssssssssssssenssessesesssserseersecersnsserseonnae £5.50 
Add ZX Microdrives to your QL. : 


Joystick Adaptor ....ccsssscsescsssssssescensseesesseseesneseeneseorecevereaneneneesiees 


FOR THE QL, SPECTRUM, (ALL), BBC & ELECTRON:- 
WD Morse Tutor £4 cassette, £6 mdv or 514’, £8 314” 
Teach yourself to read Morse Code. From absolute beginning to 18 wpm! Feedback 
on screen or printer. Random letters, numbers or mixed, 100 random sentences, 
many helpful features include phonetic speech via Currah Micro-Speech 
(Spectrum). Discs unsuitable for BBC B+. 

We export hardware and third-party software. Ask for lists 


PAYMENT:- 
In advance, in STERLING on British bank branches, international Giro, Postal 
Order or ACCESS/MasterCard. Add £1 outside Europe for AIRMAIL. 


FROM:- 


WDSoftware aw, 


Hilltop, St Mary, Jersey, C.1. Tel: (0534) 81392 
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FORM 


Multilingual programming 
expert Charles Gerrard fo- 
cuses his attention on 
Forth, the Structural 
language gaining popular 
~ appeal. 


. rogramming seriously is an 
archaic art which is definitely 
not necessary. | do not know 
whether you prefer to pro- 
gram. top-down, bottom-up 
or standing on your head, but there are 
a few accepted guidelines to good pro- 
gramming. The most important and 
most talked about is program structure. 
That involves programming an applica- 
tion in discrete functional processes, 
though it also involves avoiding all those 
GOTO a line number which can be 
found approximately three printer 
sheets away, just before another GOTO 
which should bring you back to some- 
where in that area. 

Perhaps your programming style is 
not so bad. If you were to imagine a 
perfect language for this form of struc- 
tured programming, everything would 
be described in the form of functions, 
which would invoke other functions, and 
soon. That means that rather than trying 
to write and correct one large portion 
of code, the program can be considered 
as a collection of smaller problems, 
known as modules. 

Ideally, each module should contain 
a small linear sequence of instructions, 
Calling other modules where necessary, 
and have only one entry and exit point. 
That means that the module can be 
tested easily and, where necessary, 
changed, without finding suddenly that 
it Causes problems throughout the rest 
of the program. 

If you have been following our recent 
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Lisp series, you will notice that the 
language is very much along these lines, 
but we can go one better. If we forget 
about writing programs and just write 
words to perform tasks, we will be one 
step closer to our perfect structured 
language. 

Coincidentally, that is exactly the way 
the language Forth works. Written and 
developed in the early 1970s, at about 
the same time as Basic, Forth took a 
long time to gain acceptance but in re- 
cent years it has been becoming in- 
creasingly popular as a speedy, struc- 
tured alternative. 

The reason for the slowness of Basic 
is that it is interpreted. As the program 
is run, the operating system looks at 
each new statement and then calls the 
code to perform whatever actions are 
necessary. The faster method is to use 
a compiled language, where the source 
program is run through a compiler, 
creating a machine code object pro- 
gram which can then be run. 

Forth does not truly fit into either of 
those catagories. It is certainly not inter- 
preted but runs true machine code. At 
no time is it necessary to run a compiler 
manually. Forth works by defining words 
in terms of other words. Starting with 
an initial vocabulary, the user defines a 
new word, or function, in terms of those 
the computer already knows. At that 
point the computer immediately will 
create a machine code subroutine for 
the new word, with a particular starting 
address. That task is made relatively 
easy, when compared to full compilers, 
by the simplicity of the language. 
Obviously, if the new addition to the 
vocabulary uses any other previously- 
defined words, a simple call to the ap- 
propriate subroutine will suffice. 

In summary, Forth gives you short, 
concise modules for a well-structured, 
easy-to-read sequence of tasks. It is 
easy to write and produces fast, com- 
piled code. So why does everybody not 
use it? The only possible reason is that 
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people cannot handle the Reverse 
Polish Notation arithmetic which Forth 
uses. 

Forth arithmetic works on the stack 
basis. That can be imagined as a pile 
of plates. Initially empty, new plates/ 
numbers can be added at any time; the 
top two can be mainipulated to give new 
results, simulating the Basic arithmetic 
functions, and the top plate/number can 
be removed. That is known as a Last 
In, First Out (LIFO) structure, because 
of its nature. Let us imgine that we want 
to add two numbers. The normal way 
to write this would be: 

A+B 

If we were using a stack system, as 
many computers do, the ‘A’ would be 
placed on the stack. The next character 
would be the ‘+’, so the computer 
would have to register the fact that it 
intends to carry-out a PLUS operation 
with whatever follows the ‘+’ character. 
Moving further along the line, the ‘B’ is 
found and placed on the stack. Continu- 
ing along the line, the computer finds 
there is nothing more. Therefore it 
checks its memory and finds an out- 
standing PLUS operation. So it removes 
the last two items from the top of the 
stack, adds them, and places the result 
back on to the stack. 

That example was not very complex 
but imagine how many operations the 
computer may have had to remember 
if there had been further operations after 
the ‘B’ character. The alternative ap- 
proach is to use RPN notation. In the 
foregoing case, this would look like: 
AB+ 

Now the parser, checking through 
the line, finds a number ‘A’ and places 
it on the stack. Next, it finds another 
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number, ‘B’, and so places that on the 
stack. Then follows the ‘+’ operator, 
so it takes the last two items off the 
stack, adds them, and places the result 
on the stack. Finding the end of the line, 
it terminates. 

The latter method is a far more sensi- 
ble and logical approach to arithmetic. 
Unfortunately, it does not conform to 
the method we were all taught and con- 
sequently can be very confusing until 
you become accustomed to it. After alll, 
is it fair to ask the computer to add two 
numbers before telling it what the 
second number is? A slightly more com- 
plex operation might involve three 
numbers: 

ABC+4+-— 

Following this, the first three numbers 
are placed on the stack, with ‘A’ at the 
bottom. Then the PLUS operation is 
performed on the top two numbers, giv- 
ing the number B+C at the top of the 
stack, having first removed both ‘B’ 
and ‘C’. Finally the SUBTRACT opera- 
tion subtracts the top number (A+C) 
from ‘A’ and places the result on the 
stack. In conventional notation, that 
would be equivalent to: 

A-(B+C) 

We have now dealt with the 
groundwork of the language and can 
look at how to define words. Definitions 


are initiated by the colon ‘:’ character. 
Another very useful symbol is the dot 
‘”, which will remove the top item from 
the stack and print it. If, having initialised 
Forth, we were to type the number ‘7’ 
followed by @ENTER®), that would be 
placed on the stack and the computer 
would respond ‘Ok’, as it always does 
having completed a successful opera- 
tion. We might then type the number 
‘6’, which would also be placed on the 
stack. We can look at the top number 
with the command ‘.S’, which in this 
case would print-out: 


‘6 OK 


Then the command ‘+’ should add 
the six and seven and leave the result. 
Typing ‘.’ will remove and print this. You 
should get the line: 

13 OK 


We could easily make this into the form 
of a definition, which will be: 
»PEUS +=; 

The semicolon ‘;’ indicates to the 
computer that we have finished defining 
our word. This line tells the computer 
to add a new word, PLUS, to its voc- 
abulary. That word should perform the 
‘+’ and ‘.’ operations, before terminat- 
ing. We can try this by typing the 
sequence: 

76 PLUS 

which would give the answer: 

13 OK 

as before. In this case, we have typed 
all the input on one line, though in prac- 
tice it does not matter. 

A slightly more complex definition 
might be to work out the cost of buying 
your favourite computer magazine for a 
given number of months. The definition 
for this would be along the lines: 
HCOST 125% AGOY a: 
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That multiplies the number on the stack 
— the number of months — by the price 
in pence, then places 100 on the stack 
and divides, to give a result in pounds, 
which is removed and printed using the 
‘ operator. If we then write the line: 
5 COST 
we will get the result: 
6 OK 
indicating a cost of £6. That is all very 
well but not very useful but it highlights 
one of the main disadvantages with 
Forth — it uses integer arithmetic. 
There are a number of ways around 
the problem. If you need to be able to 
print floating point results, you will have 
to write your own routines unless you 
are fortunate enough to have a Forth 
which includes them as standard, which 
is not normally the case. Of course, hav- 
ing written and stored the new routines, 
you have effectively extended your Forth 
language. That is one of the great 
advantages of the languge. 


Alternatively, if you need only. the 
accuracy during calculations, there are 
other methods you can use. They 
involve the manipulation of double-pre- 
cision numbers — i.e., in the range 
-2147483648 to 2147483647 rather 
than -32768 to 32767 for single-preci- 
sion numbers. Byte number ranges — 0 
to 255 — are also normally available. 

There are other functions which you 
will encounter and one of them is par- 
ticularly useful for the pounds and pence 
problem. That is the ‘/MOD’ operator. 
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It works in exactly the same way as 
divide ‘/’ but before placing the trun- 
cated, i.e., integer result on the stack, 
it places the remainder there. So if we 
re-write our COST function as: 

» COST 125 1007/MOD 2 

then type the line: 

5/COSii 

we will get the result: 

6 25 OK 

Better, but not as yet perfect. 

What we really need is the ability to 
print strings. That is done using the dot- 
quote (.”) sequence. That, as with all 
other Forth operators, must be followed 


by a space, and anything after that, up ° 


to the next quote, will be printed directly 
to the screen. So our function now looks 
like: 
:COST 125"100/MOD.“£".."." .; 
which, with the previous input, gives the 
result: 
£6.25 OK 

It is a pity about that space after the 
‘6’. Here again, Forth can come to the 
rescue with its dot-R (.R) operator. 
When that is used, it will retrieve the top 
number from the stack and use it as a 
field width, printing the number at the 
right-hand end. If the field is too small, 
it is extended to accommodate the 
number. 


In our situation a field width of one 
would be appropriate. So our final ver- 
sion of the function is: 
}COSI2500/MODe 27 1eRha. =: 
which gives the result: 
£6.25 OK 

That is rather a complex-looking line, 
especially if you are new to the 
language. Of course, you can easily re- 
define the symbols to be more meaning- 
ful. If you do not like the ‘.R symbol for 
the field width, why not change it? The 
routine: 
~FIEEDR Re 
should do the trick. 

That procedure may seem a little 
long-winded considering the result we 
have obtained but there is no reason 
why you should not, say, write part of 
the function as another word. So: 
:CPRINT 100/MOD.“£"1.R..4.".; 
That can then be called by both COST 
and any other function as a method of 
printing-out monetary sums. Have you 
spotted the deliberate mistake? The 
routine works perfectly for remainders 
of 25, 50 and 75, which we will get in 
this situation, but what happens if we 
have a remainder of ‘5’. That would be 
printed as: 
£6.5 OK 
Not correct. We need to add a check 
to see whether any leading zeroes are 
necessary before printing the remain- 
der. That of course, involves decision 
making, along the lines of the Super- 
BasichliaweelieNr. . ELSE ENDIF 
statement. : t 

Unfortunately, the Forth test operates 
a little differently to that normally found 
in Basic. In SuperBasic, a conditional 
Statement follows the lines: 

IF (condition) THEN 
(statement executed if condition is ture) 

EESE 
(statement executed if condition is false) 
END IF 
But, to begin with, as we have seen, 
Forth does not operate on expressions 
as do other languages, but works using 
RPN, placing and retrieving values from 
the stack. It seems sensible, therefore, 
that rather than evaluating a condition, 
the IF statement looks to the stack for 
the answer. 

As a consequence of this, the Forth 
IF .. THEN statement is different to the 
form commonly used in other 
languages. It is similar enough, how- 
ever, to cause confusion. If you consider 
our RPN, then it would seem reasonable 
for the IF command to appear after the 
condition, which it does. The condition 
itself will also be in postfix form. A typical 
example such as: 

IF A = B THEN statement 
would appear in Forth as: 
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AB = IF statement THEN 

It is worth lookingmore closely at the 
way this workd. First, the values of A 
and B are placed onto the stack, with 
B uppermost. Next, the relational 
operator ‘s’ is executed. That takes two 
values from the top of the stack, and 
places a Ture/False flag on the stack. 

As with many other computer 
languages, this flag will be ‘1’ for true, 
and ‘O’ for false, though any non-zero 
value will be considered false. Once this 
is complete, the IF command is 
executed. That, as you might expect, 
removes a value from the top of the 
stack and, if it is true, executes the fol- 
lowing statement, otherwise control 
continues after the THEN command. 
A simple test of this could be: 

iEot = IE EQUA TEN: 
This will test two numbers from the top 
of the stack and, if they are equal, will 
print EQUAL before terminating. You 
can try this with commands like: 

G7 TEST 

OK 
or: 
21624 VEST 
EQUAL OK 

As you can see, rather than using 
THEN preceding the first statement to 
be executed if the condition is true, it is 
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used to terminate the condition sequ- 
ence. A word of warning to anybody 
using the Computer One Forth pack- 
age. Instead of the common THEN, this 
implementation uses ENDIF, presuma- 
bly to make it more like that of other 
languages. Apart from that direct 
substitution, the syntax of the command 
is the same. 

We can also include an ELSE condi- 
tion in the syntax, placing the ELSE after 
the “statements to be executed if the 


TABLE ONE 
RELATION! OPERATION 


! True if A equals B 
! True if Ais greater than B 
! True if Ais less than B 
! True if Ais less than zero 
! True if A equals zero 
! True if Ais greater 

than zero 


! True if A does not equal B 

! True if Ais non-zero 

! True if Ais less than 
or equal to B 

! True if Ais greater than 
or equal to B 

! True if Ais in the range 
B.C. (signed arithmetic) 

! True if string A equals 
string B, of length C 


flag is true”, and before THEN. Extend- 
ing our above example: 
HiESio=— IF EQUAL TEESE: 
“NOT EQUAL” THEN; 
which would either print ‘EQUAL’ or 
‘NOT EQUAL’, depending on the state 
of the two items at the top of the stack. 
You may have noticed, that due to 
the syntax of the language, there is no 
way in which the ‘=’ operator could be 
anything other than a_ relational 
operator, since it is never used in asign- 
ing values, as in SuperBasic. There are 
a number of relational operators, other 
than the ‘=’. Table One gives a selection 


‘of these. In all cases, where multiple 


letters are shown in the operation, the 
latter is assumed to be higher in the 
stack, i.e., nearer the top, and the first 
to be accessed. So, in the operation: 
True if A equals B 

then ‘B’ is assumed to be at the top of 
the stack, though with that operation it 
would not matter. All of the operations 
will remove the appropriate number of 
values from the stack, and place a true/ 
false flag onto the stack. The last two 
relations shown are from Computer One 
Forth, and may not be found in other 
versions, though they can easily be 
added. In the case of the string compari- 
son, string addresses are stored on the 
stack. 
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OFTWARE FILE 


Ken McMahon and John Barnes fight over the only Sinclair QL World joystick to bring you this month’s 


game reviews. 


Mortville 
Manor 


-c/o Rio Promotions Ltd, 
Dept. QL, 28 Waverley 
Grove, London N3 NPX 
Price: £19.95 


that you make them do so. 
Like most adventure games 
the vocabulary is limited but 
sufficient to make 
conversations believable. 
There are many words not 
known to you at the 
beginning of the game, 


Mortville Manor. A good balance of text and graphics. 


As the instruction booklet 
states, Mortville is more of 


an adventure than a journey. 


As Jerome Lange, a private 
eye, you receive an urgent 
telegram from Julia 
Defranck, a critically ill old 
friend who is appealing for 
help. On receipt of the 
telegram you leave Paris 
hurriedly for the isolated 
country house but your 
arrival at Mortville sadly is 
too late. Did Julia die from 
natural causes? Or has some 
heinous crime been 
committed? As a detective 
your appetite for intrigue is 
wetted and you stay to 
investigate the mystery. 

In residence at Mortville 
are the relatives of the 
deceased and Max the 
servant, who welcomes you 
on arrival. Naturally, none of 
those people is particularly 
keen to talk after the 
bereavement but if headway 
is to be made it is essential 
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however, which produce a 
more fruitful response from 
the residents of the Manor. 
It is therefore important to 
establish the proper 
questioning technique early 
in the game, as that will 
supply you with a greater 
number of clues. For some 
time I could get a response 
from the characters only by 
typing Julia but once I had 
discovered how to phrase 
questions I learned a great 
deal more. 

Mortville Manor is large 
so there are many rooms to 
explore. Before you enter 
each room a cryptic clue is 
displayed on the screen 
which is intended to point 
your search in the proper 
direction. Only some of 
those clues helped me but 
they all provide the 
necessary incentive to 
discover what is waiting to 
be found. 

Exploration of the rooms 


is made more enjoyable by 
the very good graphics and 
the tremendous attention to 
detail, for example the light 
which casts shadow in the 
bureau. The graphics greatly 
enhance the atmosphere of 
the Manor and provide every 
budding detective with 
ample opportunity to glean 
useful clues. 

The cursor keys can be 
employed to help, which 
makes examination of the 


~ rooms and their ante- 


chambers a little more 
thorough. With the correct 
commands, furniture can be 
opened and objects looked 
at in detail, so you can feel 
satisfied that each room has 
been searched properly. 

Obviously to play an 
adventure game properly 
you need to spend a great 
deal of time on it, which I 
could not do. After about 
four hours of playing sleuth, 
I had learned very little to 
help my investigations and 
encountered only a small 
percentage of the 80 or so 
screens. 


That was no fault of the 
game. The degree of 
difficulty is sufficiently high 
which means it is not the 
kind of adventure you can 
play in a few hours. One 
criticism is the time taken to 
paint the screens which after 
a prolonged period of 
playing, becomes irritating, 
but the quality of graphics 
more than compensates. I 
enjoyed playing Mortville 
Manor as it has the correct 
balance of text and graphics 
but perhaps a little less of a 
challenge in the early stages 
would have been an 
improvement. 


The word is that Pyramide 
have several more QL games 
inthe pipeline. They are 
currently available in 
France, but have yet to be 
translated. 


BJ in 3D 
Land 


Publisher: Eidersoft 
The Office, Hall Farm, 
Ockenden, Upminster, 
Essex 

Price: £12.95 


BJ isa kind of superstar of 
the Eidersoft games range. 
Well, perhaps not exactly a 
superstar, but having 
appeared in two other titles 
he doing considerably 
better than most game 
characters. 

The BJ scripts inevitably 
involve him getting lost 
somewhere or other; this 
time it is in 3D land, a 
“tortuous three-dimensional 
maze”, but what the cassette 
inlay does not mention is 
that it is a very pretty 
tortuous maze. Looking 
rather like one of those 
stages made up of different- 
sized cubes, 3D Land cubes 
are like licorice allsorts — the 
pink, yellow and black 
striped ones people leave 
when you offer them 
around. I always wondered 
what happened to them. 

There are three types of 
allsort. Some have diamonds 
on top — they are the ones 
to go for as every diamond 
collected earns valuable 
points. Multi-coloured 
allsorts are energy-giving 
squares, again well worth a 
visit, because when BJ’s 
energy runs out that is the 
end of the game. Red-and- 
black chequered squares 
should be avoided at all 
costs. Land on one of them 
and BJ’s energy will be 
drained away before you can 
say Bertie Bassett. 

The object of the game, 
you may by now have 
gathered, is to wander 
round the maze collecting as 
many diamonds as you can 
before the energy runs out. 
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B. i te again 


Of course, things are never 
so simple. There are 
monsters, if that is the word 
for them, which roam about 

_ ina fairly random fashion, 
bumping carelessly into BJ 
and draining his precious 
energy still further. 

The monsters are fairly 
cute — glow-worms, snakes 
with apples on their backs, 
and something which looks 
like an animated fireball, but 
I could be wrong. Cuteness 
aside, they were a little 
disappointing. Half the time 
they did not take a great deal 
of interest in BJ. Perhaps 
they were looking for 
friends; they were a little 
thin on the ground and 
some company certainly 
would have enlivened 
things. 

Apart from that criticism, 

- BJ in3D Land is an otherwise 

- excellent game. One word 
of advice. Unless you are 
using the cursor keys, make 
sure you have a good 
joystick. A high degree of 
accuracy is required to jump 

' between squares and there 
is nothing more infuriating 
than ending somewhere you 
did not wish because your 
joystick will not do what you 
tell it to do. 


Crazy 
Painter 


Publisher: Microdeal 
Box 68, St Austell, 
Cornwall 

Price: £12.95 


The object of this game is 
quite simple, to paint the 
screen as quickly as possible 
with as little paint as you can. 
Naturally enough, a 
menagerie of assorted 
creatures make your task 
more difficult. 

There are the usual home 
decorators, pests, like the 
dog which walks across the 
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ving foxprins, 


as ‘the Snake hich eats its 
way across the screen. With 
all those obstacles it is 
difficult to be economic with 
your paint, especially when 
some take the paintbrush if 
you endeavour to paint over 
them. 

The game starts obviously 
enough at level one and 
each stage gets faster, making 
your job more difficult. On 
completing your levels 
successfully you are entered 
on a challenge stage where 
the object is to stop paint 
dripping down the screen 
with a scraper, a welcome 
change from the painting. 
You return quickly to the 
paintpot, however, and 
continue getting faster, 
using increasingly large 
quantities of paint, and 
getting more irritated. 

The graphics are not 


Crazy Painter 


spectacular, but suit the 
game well,but some of 

the colour combinations can 
be a little fierce on the eye. 
There is also an extremely 
irritating selection of tunes 
to whistle while you work, 
but London Bridge ts falling 
down played a few times is 
a good enough reason to 


turn off the sound. 


The major problem, is the 
lack of variety. The early 
screens are reasonably 
enjoyable but the repetition 
becomes tedious after four 
or five levels, with the 
increase in speed not being 
a sufficient substitute for 
more original ideas. After 
several games I was 
managing to get a 
respectable score which 
indicates the simplicity of 
the game. Crazy Painter is 
not a bad game, but its lack 
of originality or complexity 
does not entertain the player 
for any length of time. 


Executive 


: bas 
Adventure 
Publisher: Gemini 
Marketing, Gemini House, 
Concorde Road, Exmouth, 
Devon EX8 4RS 
Price: £12.95 
There is no shortage of 
adventures for the QL at the 
moment. Whether your 
preference is for the more 
traditional sword and 
sorcery fantasy, or 
something a little more 
down to earth, there is a 
diversity of scenarios from 
which to choose. 

Executive adventure falls 
into the latter bracket — the 
ultimate escape for those 
confined to the mediocrity 
of low-ranking corporate 
life but with unfulfilled 
ambitions to reach the 
boardroom. Subtitled Rags to 
Riches, the game casts you 
in the role ofa lowly tramp. 
Your objective is to drag 


- yourself from the depths of 


skild row and, using nothing 
more than your wits, to 
reach the top of the table in 
the company boardroom. 

The adventure begins on 
acold, dismal morning with 
you on the inevitable park 
bench. You have nothing — 
not even a bottle of cheap 
sherry to cheer you. A brief 
wander round the park will 
have to suffice but there is 
little of interest and you 
soon go round in circles. 

There is nothing for it but 
to venture into the high 
street and see what is 
happening. Without giving 
away too much here is the 
Sinclair QL World guide toa 
swift climb up the ladder of 
success, or at least the first 
rung or two. 

Travelling westward from 
the park you will soon find 
yourself outside Claridges, 
the posh peoples’ 
department store. Waste no 
effort trying to get in at that 
stage; the doorman does not 
take kindly to tramps and 
even a tramp’s ego can suffer 
from being thrown in the 
gutter. 

Instead, go to Rotten Row, 
where you will find more 
suitable attire. It takes more 
than a smart suit to impress 
the doorman at Claridges, 


‘splast out on some 
accessories. 

If you are feeling hungry, 
a trip to a burger bar might 
satisfy your appetite. I 
decide to miss that. 
Resources are scarce in the 
early stages and nobody ever 
made it rich by stuffing their 
faces with quarter-pounders. 


ddle of 
ds be 


Executive Adventure 


The Bark West bank 
seemed like a good place to 
pick up some readies with 
the cashcard I discovered in 
the suit pocket. I had 
difficulty, though, in 
persuading the machine to 
accept it. Should anyone else 
discover the secret, please 
let me know. 

When you are well-loaded 
with cash and suitably 
dressed, it is time to go 
shopping. From there, you 
are on your own. Claridges 
is like any other department 
store — plenty to buy but not 
much of it is affordable. The 
key is to buy only things 
which look as if they might 
make you more money or 
lead to a useful contact. Be 
careful not to fall down the 
hole by the cigarette kiosk. © 

As text-only adventures 
go, Rags to Riches scores 
fairly well; the theme is 
excellent. In the early stages 
at least the clues are not 
particularly complex and a 
fair amount can be achieved 
in a short time. That makes it 
in an ideal game for novices. 
There are two criticisms. 
The parser, the part which 
works out syntax, is not 
incredibly sophisticated and 
the game is therefore a little 
fussy about accepting certain 
constructions. Second, a text — 
adventure relies solely on 
description for atmosphere 
and I felt the game could 
have benefitted from a little 


‘more imagination in that 


respect. Otherwise a 
perfectly enjoyable piece of 
escapism. 
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was a pleasant, 
sunny day. 
significant in 
hat all the other 
days I could 
remember were not 
pleasant sunny days. I 
particularly remember it, 
having spent most of the day 
staring out of window, 
musing over puzzle page 
possibilities. Of course, I 
had been doing it for days — 
usually finishing over the 
bottom ofa pint at the local. 
Unfortunately — or not, 
depending on your point of 
view — there were a number 
of locals. They were called: 


The Anchor (A) 
The Black Swan (B) 
The Coach & Horses (C) 


The Duke of York (D) 
The Eight Bells (E) 
The Fox & Hounds (F) 
The George (G) 
The Horseshoe (H) 


Regular readers will 
undoubtedly have guessed 
where all this is leading. 
What I want to know is how 
long it would take me to visit 
all eight public houses, have 
a single pint — taking exactly 
10 minutes in each, and 
return home. Figure one 
gives the distances, in 
minutes of walking time, 
between any two locations, 
and figure two gives the 
distances from my home to 
any of the eight pubs. 
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The problem is that after 
a little liquid refreshment, 
complex manoeuvres, such 
as walking, tend to be more 
difficult than normal. After 
much empirical analysis, I 
was able eventually to assign 
a “potency” factor to the 
various draughts — figure 
three. Multiply subsequent 
walking time by that factor 
to obtain the real result. 

Naturally, the factors are 
cumulative. So if I were to 
travel from home to the 
Anchor, then to the Black 
Swan, then home, the time 
would be: 


Home to Anchor 
Drinking time 

Anchor to Black Swan = 
Drinking time = 
Black SwantoHome = 


TOTAL TIMETAKEN = 


You need not worry about 
such minor matters as 
opening hours and so on. If 
we assume, however, that I 
leave home at exactly 6 p.m., 
what time to the nearest 
minute can I expect to arrive 
home? 

As usual, I would welcome 
any elegant solutions to the 
problem and, if they are 
short enough, I will include 
one of them in the solution 
page. They should preferably 
be in SuperBasic, since it is 
the only language common 
to all QL owners. 


Figure 2. 


Distances to HOME (in minutes): 


Anchor 

Black Swan 
Coach & Horses 
Duke of York 


From: 


Figure 3. 


PublicHouse !Potency 


Anchor ! 
Black Swan ! 
Coach & Horses ! 
Duke ofYork ! 


1.01 
1.44 
IL 
1.82 


4,500 minutes 
10.000 minutes 
5.555 minutes (1.01*5.5) 


10.000 minutes 


3.636 minutes (1.01*1.44 *2.5) 


33.691 minutes 


All entries must be written on the panel provided on this 
page. Any other form of entry will be disqualified. 


= 45 Eight Bells 
= 2.5 Fox & Hounds 


Zo) George 


= 2.0 Horseshoe 


Eight Bells 
Fox & Hounds 
George 
Horseshoe 


Entries must be sent by post to: 


PUZZLE PAGE, 
Sinclair QL World, 
79-80 Petty France 
‘London SW1H 9ED 


to arrive no later then Friday, August 14, 1986 


The winner will be the first correct entry drawn out of 


PUZZLE PAGS 


the editor’s tankard. In the even that nobody submits the 
correct arrival time, the winner will be the person with the 


closest answer. 


All entries will be judged by the Editor of Sinclair QL 
World, whose decision is final. No correspondence will be 
entered into regarding the result. 


ENTRY FORM 


Arrival time = 


Route = Home. 


Home 
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SOLUTIONS 


now know why 
there were so 
few entries to 
the Network 
Problem. You 
were all too busy counting 
ball bearings and building 
pyramids. 

For anybody who missed 
the puzzle, you were trying 
to find a palindromic 
number i.e., one which 
reads the same forwards as 
backwards, which contains 
the same digits, such as 2222. 

Having found this 
number, which represents a 
large pile of ball bearings, 
you had to split it into two 
groups, one of which 
would form a triangular 
pyramid, the other a square 
pyramid, with nothing 
remaining. 

The additional puzzle was 
to find a solution where, if 
you were to add the number 
of levels in the two pyramids 
thus formed, you would get 
another palindromic number. 


Figure 4. 


Having found this, and given 
that the diameter of each ball 
bearing was one centimetre, 
I wanted to know the 
combined heights of the two 
pyramids, to the nearest 
centimetre. 

The response to this 
problem was enormous and 
I would like to thank 
everybody for their very 
comprehensive solutions, a 
number of which were 
written in languages other 
than SuperBasic, including 
Pascal, Fortran and APL. 
Figure four shows a program 
by Andre Klap, which will 
give the required result. The 
functions ‘triangle’ and 
‘square’ give the total 
number of balls ina pyramid 
as a function of the level/ 
parameter — ‘Is’ and ‘It’, 
respectively. 

You will notice that they 
store the results in arrays, ‘tr’ 
and ‘sq’, minimising the 
calculations involved at later 
levels. All combinations of 


100 REMark ** Solution to Pyramids Puzzle (June 1986) 


110 REMark ** by Andre Klap 


120 REMark #300 KOK OR Ao oo ok tok ok oa aK KK 


130: 


140 DEFine FuNction square(1s) 


150 IF sq(ls)=0 THEN 


160 sq(1s)=1s¥*(1+18*(3+2*18))/6 


170 END IF 

180 RETurn sq(1s) 
190 END DEFine square 
200 : 


210 DEFine FuNction triangle(1t) 


220 IF tr(1lt)=0 THEN 


230 tr(lt)=1t¥*(2+1t*(3-1t))/6 


240 END IF 

250 RETurn tr(1t) 
260 END DEFine triangle 
270 : 


280 DEFine PROCedure pyramid(x.a,b.c.d) 


290 LOCal rest 

300 a=l 

310 REPeat outloop 
320 b=square(a) 
330 rest=x-b 


340 IF rest<O THEN EXIT outloop 


350 c=1 
360 REPeat inloop 
370 d=triangle(c) 


square and triangular 
pyramids are tried for totals 
of 222. 333, 444, and so on, 
balls. 

Whenever two pyramids 
are found which add up to 
this total, the function 
‘check’ is called to see 
whether the combined 
levels are also palindromic. 
If this is the case, then ‘ok’ 
is set to true, and the 
solution is printed. 

Having found the correct 
solution — figure five — the 
problem remains of finding 
the height of each pyramid. 
This is easily done by 
considering each pyramid. 
This is done easily by 
considering each pyramid to 
be ‘level-1’ centimetres high, 
by taking lines from the 
centre of the top ball bearing 
to the centres of the base 
corner ball bearings. If we 
call these new levels ITRI 
and LSOR, simple 
trigonometry will give the 
vertical heights as: 


PRINT" Square 


LTRI * sqrt (6)/3 for the 
triangular pyramid, and 

LSQR * sqrt (2)/2 for the 
square pyramid. Do not 
forget to add one to the 
result of each of these for the 
radius of the top and base 
ball bearings which we 
subtracted initially. Based on 
our figures, this gives a final 
result of: 

(288 * sqrt(6)/3) + (275* 
sqrt(2)/ 2) + 2 which gives: 

431.6054 cms. 
or 
432 cms. to the nearest 
centimetre. 

The editor is still 
determined to prove this 
answer but we were able to 
interrupt his search for 
centimetre diameter ball 
bearings to choose Barry 
Dyke of Huddersfield as the 
winner. He will receive a 
year’s subscription to 
Sinclair QL World. 


[lev/balls] ",a.b 


PRINT"Triangle [lev/balls) ".c.d4 


PRINT" TOTAL 
END DEFine rept 


DEFine PROCedure check(y) 
Local a$,1,i 
aS=y : 1=LEN(a$)+1 : 
FOR iz1 TO 1 DIV 2 
IF a$(i)<>a$(1-i) THEN 
ok=0 : EXIT i 
END IF 
END FOR i 
END DEFine check 


ok=1 


REMark ** MAIN PROGRAM ** 


DIM 8q(2000), tr(2000) 
CLS 


num_dig=3 : 
ok=0 : 


digit=2 
lv=0O : ld=0 : b 


REPeat loop 
numb$=FILL$(digit,num_dig) 
n=numb$ ; PRINT numbs 
pyramid n,lv,ld,bv,bd 


(lev/balls)] ",a+c,b+d 


IF ok THEN EXIT loop 
IF digit=9 THEN 
digit=1 
num_dig=num_dig+1 
ELSE 
digit=digit+1 
END IF 
END REPeat loop 
CLOSE#3 


380 IF d=rest THEN 

390 check arc 

400 IF ok THEN 

410 rept x,a,b,c.d 
420 EXIT outloop 
430 END IF 

4uo END IF 

450 IF d>rest THEN EXIT inloop 
460 cac+l 

470 END REPeat inloop 

480 a=arl 

490 END REPeat outloop 

500 END DEFine pyramid 

5SiO7% 

520 DEFine PROCedure rept(x.a,b.c,d) 
530 PRINT : PRINT" SOLUTION ..." 


Figure 5. 


SOLUTION 
Square 7046326 
4064785 
INTL 


(lev/balls ) 
(lev/balls) 
(lev/balls ) 


Triangle 
TOTAL 
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If you’ve a program that is worthy of consideration, send it to ‘The Progs’, Sinclair 
QL World, 79-80 Petty France, London SW1. We pay for everything published at the 
usual page rates. 


This is a version of the popular 
arcade game. The object is to 
jump around a pyramid of 
blocks leaving coloured spots as 
you go, avoiding the dangerous 
bell which rolls down from the 
top of the pyramid. 

QL-Bert contains nine pyramids, 
each more difficult than the last. 
An extra life is awarded at 10,000 


- points and there is a special 
bonus if all nine pyramids are 
completed. To control Bert use 
keys D,C,H, and B. 

The program is written in 
SuperBasic, with a _ small 
machine code routine. Simply 
enter the listing, save it and start 
with run. 


100 REMark OLBERT 


110 REMark 

120 REMark (C) 1985 Esben Krag Hansen 

130 REMark 

200 MODE 8 

210 WINDOW 512,256,0,0: PAPER O: CLS 

220 WINDOW 448,200,32,16: PAPER O: INK 7: CLS 

230 high=5000: init_udg 

1000 REPeat game_loop 

1010 score=0: lscore=0: lives=3: level=0O: RESTORE 
10000 

1020 sound 80,10: sound 40,10: sound 30,10: sound 
20,10 


1200 REPeat level_loop 
1210 level=level+1 
1220 IF EOF THEN 
1230 sound 60,50: 
50,20 

1240 RESTORE 10000 
1250 OVER 1 

1260 FOR i=1 TO 20 
1270 FOR n=O TO 7 
1280 INK n: AT 10,13: CSIZE 3,1: 
vel*100: CSIZE 2,0 

1290 END FOR n 

1300 END FOR i 

1310 INK 7: OVER O 

1320 score=score+level*100: 


sound 55,40: sound 45,20: sound 


PRINT "BONUS:";le 


test_score 


1330 sound 50;30: sound 45,15 

1340 END IF 

1350 init_level: sound 60;30: sound 40,10 
1500 REPeat play_loop 


1510 
1520 
1530 


move_man 
IF mconts=-2 OR mconts=0 THEN 
scr(mlin,mkol)=mconts 

1540 scr(klin;kkol)=kconts 

1SS0O man_dead: IF lives=O THEN EXIT level_loop: 
SE NEXT play_loop 

1560 END IF 

1570 AT 1,16-LEN(score): 


EL 


PRINT score 


1580 IF mpcount=maxp THEN score=score+bonus: test_ 

score: EXIT play_loop 

1590 IF bonus THEN bonus=bonus-10: AT 19,20: PRINT 
bonus; " ' 

1600 move_ball 

1610 IF kconts=-1 THEN scr(mlin,mkol)=mconts: man_ 


dead: IF lives=O0 THEN EXIT level_loop 
1620 END REPeat play_loop 
1630 sound $0,15S 
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END REPeat level_loop 

sound 10,50: sound 40,100: sound 90;110 

IF score>high THEN high=score: print_scores 
CSIZE 3,1: OVER 1 

REPeat floop 

FOR n=O TO 7 

AT S,10: INK n: 
IF INKEY$(0)<>2"" 
END FOR n 

END REPeat floop 
CSIZE 2,0: OVER O 

END REPeat game_loop 

DEFine PROCedure move_man 
key=(KEYROW (4) &&68)+256* (KEYROW(2)&&24) 

IF key<>64 AND key<>Z048 AND key<>4 AND key<> 
THEN 

FOR i=1 TO 200 

END FOR i 

RETurn 

END IF 

figur mlin,mkol,2,139: scr(mlin,mkol)=mconts 
mlin=mlin-1+2*(key=2048 OR key=4096) 
mkol=mkol+(key=4 OR key=4096)-mlin MOD 2~- 
BEEP 200,200 : 
mconts=scr(mlin,mkol): ser(mlin,mkol)=-1 

2120 IF mconts>1 THEN score=score+12-mlin: test_sc 
ore: mconts=mconts-1: mpcount=mpcount+1: figur2 ml 
in,mkol,cols(mconts) 

2130 figur mlin,mkol,2,139 

2140 END DEFine 

2500 DEFine PROCedure move_ball 

2510 figur klin,kkol,3,137: scr(klin,kkol)=kconts 
2520 klin=klin+1: rv=RND(1) 

2530 kkol=kkol+rv-klin MOD 2 

2540 kconts=scr(klin,kkol) 

2550 IF kconts=0 THEN kkol=kkol+1-2*(rv=1) 

2560 kconts=scr(klin;kkol) 

2570 IF kconts=0 THEN rv=RND(1 TO maxpos): klin=ku 
gpos(rv,1): kkol=kugpos(rv,2): kconts=scer(klin,kko 
1) 
2580 
2590 
2600 
3000 
30L9 
3020 
3030 
3040 
3050 
3060 
3500 
ENS) 


1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
2000 
2010 
2020 
4096 
2030 
2040 
2050 
2060 
2070 
2080 
2090 
2100 
2110 


| 


PRINT "GAME OVER" 
THEN EXIT floop 


ser(klin,kkol )=-2: 
BEEP 30,0,0;-1;0 
END DEFine 

DEFine PROCedure man_dead 

FOR i=1 TO 255 STEP 3: BEEP 20,i 
lives=lives-i1: print_level_etc 

figur mlin,mkol,2,139 ° 

figur klin,kkol,3,137 

init_positioner 

END DEFine 

DEFine PROCedure test_score 

IF score-lscore<10000 THEN RETurn 

3520 lscore=score: lives=lives+1 

3530 sound 50,10: sound 30,10: sound 50,10: 
level_etc 

3540 END DEFine 

4500 DEFine PROCedure felt(x,y) 

4510 INK fcol3: curs 0,0,;128: curs 11,0,129: 
21,0,130 

4520 INK fcoll: 
coll, fcol2: curs 11»s¢,132: 
4530 INK fcol2: 
4540 END DEFine 
4800 DEFine PROCedure curs(x0o,yo;c) 
4810 CURSOR x+xo,y+yo: PRINT CHR$(c) 
4820 END DEFine : 

5000 DEFine PROCedure figur(1,k,i,c) 


figur klin,kkol,3,137 


Prince 


curs 
curs 0;4,131: curs 0;13,134: INK f£ 
curs 11,13,135 

curs 21;4,133: curs 21,135,136 


Continued on page 50 
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5010 x=-18+k*30+1 MOD 2*16: y=8+1*14 
S020 INK i: OVER -1 


S030 curs 0;0,c: curs 11,0;c+t1 
5040 INK 7: OVER O 


SOSO END DEFine 

$200 ‘DEFine PROCedure figur2(1,k,i) 

$210 x=-17+k*30+1 MOD 2*16: y=12+1*14 

$220 INK i: OVER 1 

$230 curs 0,0,141: curs 10,0,142 

5240 INK 7: OVER O 

S250 END DEFine 

6500 DEFine PROCedure init_udg 

6510 mcadr=RESPR(161): RESTORE 9500 

6520 FOR i=O TO 160: READ d: POKE mcadr+i,d 
6530 CALL mcadr 

6540 END DEFine 

7400 DEFine PROCedure init_level 

7410 CLS 

7420 FOR i=1 TO 100: BEEP 100,2*i MOD 20: 
D 8: POINT RND(200),RND(100) 

7430 INK 7 

7440 AT 1,5: PRINT "SCORE:Q0000" 

7450 AT 1,22: PRINT "HIGH:00000" 

7460 AT 19,14: PRINT "BONUS:0" 

7470 print_scores: print_level_etc 

7480 READ maxp,bonus,maxc: DIM cols(maxc) 
7490 mpcount=0 

7500 AT 19,14: PRINT "BONUS:";bonus 
7510 FOR i=1 TO maxc: READ cols(i) 

7520 READ fcoll,fcol2,fcol3 

7530 DIM scr(12,14) 

7540 grad_y=RND(2 TO 7): pitch_2=RND(45) 
7550 OVER 1 

7560 FOR i=2 TO 11 

7570 READ word: wbin$=bin$(word) 

7580 FOR n=2 TO 13 : 

7590 scr(i,n)=wbin$(n-1)* (maxc+l1) 

7600 IF scr(i,n) THEN BEEP 1000,20+50/i,pitch_2,0, 
-grad_y: felt -—24+n*30+i MOD 2*16,12+i*14 

7610 END FOR n 

7620 END FOR i 

7630 OVER O 

7640 READ maxpos: DIM kugpos(maxpos,2) 

7650 FOR i=1 TO maxpos: READ kugpos(i,1),kugpos(i, 
2) 

7660 READ mstartlin,mstartkol 

7670 init_positioner 

7680 END DEFine 

8000 DEFine FuNction bin$(dec) 

8010 LOCal i,res$: res$="" 

8020 FOR i=1 TO 12 

8030 res$=(dec MOD 2)&res$ 

8040 dec=dec DIV 2 

8050 END FOR i 

8060 RETurn res$ 

8070 END DEFine 

8200 DEFine PROCedure init_positioner 

8210 mlin=mstartlin: mkol=mstartkol 

8220 mconts=scr(mlin,mkol): scr(mlin,mkol)=-1 
8230 figur mlin,mkol,2,139 

8240 rndval=RND(1 TO maxpos) 

8250 klin=kugpos(rndval,1): kkol=kugpos(rndval,2) 
8260 kconts=scr(klin,kkol): ser(klin,kkol)=-2 
6270 scr(klin,kkol)=-2: figur klin,kkol,3,137 
8280 END DEFine ; 

8400 DEFine PROCedure print_scores 

8410 AT 1,16-LEN(score): PRINT score 

8420 AT 1,32-LEN(high): PRINT high 

8430 END DEFine 

‘8600 DEFine PROCedure print_level_etc 

8610 AT 19,3: PRINT "LEVEL:00" 

8620 AT 19,11-LEN(level): PRINT level 

8630 AT 19,277 PRINT “LIVES: "s lives 

8640 END DEFine 

8800 DEFine PROCedure sound(st,nd) 

8810 LOCal i 

8820 FOR i=st TO nd STEP 1-2*(st>nd): BEEP 5S00,;i: 
PAUSE 1 

8830 END DEFine 

9500 DATA 118,255,32,124,0,1,0,1,34,124,0,0,0,0,69 
»250,0,8,112;37; 78,67; 78;117,128,14 

9510 DATA 4,12,28,60,60,60;,;60,60;60 

9520 DATA 124,124,124,124,124,124,124,124,124 
9530 DATA 64,96,112,120,120,120,120,120,120 

9540 DATA 64,96,112;120,124,124,124,124,124 
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9550 DATA 0,0;0,0,124,124,124,124,124 

9560 DATA 4,12;28;,60;124;124,124,;124,124 

9570 DATA 124,60;28,12;4;0;:0;,0;0 

9580 DATA 124,124,124,124,124,0,0;0;0 

9590 DATA 124,120,112,96,64;,0,0;0;0 

9600 DATA 12,16;44,60,60,60;60;28,12 

9610 DATA 96,48,120,120,120,120,120,112,96 

9620 DATA 60,124,124,124,60,28;8,8;,;12 

9630 DATA 96;48,120,124,124,96,64,64,48 

9640 DATA 0,;28,60,124,60,28,0;,0;0 

9650 DATA 0,96;112,120,112;96;:0;,0;,0 

10000 DATA S5,1000,1,;4;,5,1,7;32;96;:112;240;248; 504 
»508,;1020,1022,2046,1;,;2,8,10;,8 

10010 DATA 42,1200,1,1;7,;6,5,;112;96;80;144;136; 264 
»260,1020,1022;2046;3,2;7;2,;8,2,;9;10;8 

10020 DATA 43,1200,1,;5;4;1;,3,508,360,292,360;216;5 
041248, 264,216124057,2,5121652)71258125912,10,2;,11 
18,8 : 
10030 DATA 41,1400,154,7,2;1;508,504,112,96;1121;24 
0, 216;408,396; 780; 7;2+552;6:25752:;852539;2,;10;2s;11, 
6,8 

10040 DATA 102,1500,2,2,7,6,5,1,1122,1188,1686,182 
0,1806,1820,; 168611460, 360;58454,;2;3125752;8:2,;12;1 
1,7 

10050 DATA 50,2000,2,0;3,6;:1,5,;32,96;112,240,248,2 
40,112,;96;32,0,1,2;8,10;8 

10060 DATA 50,2000,1;7;65,2:4,112;240;216,408,396;7 
80,1022,2046,1539;3075;352;7,2;:8;:2:9:8;8 

10070 DATA 86;2200;2,;7;,0,6;1;,5,260, 780; 396,924,508 
»1020,396, 780,260,516,2,2,5,2;11;6;8 

10080 DATA 53,2500,1,;6,352,7;476;,1020, 774;,1020;508 
15045248, 240,112,96,4,2,;5,2,6,2,10,2,11,10;8 


them. The program enables you 
to load files with a single keys- 
troke. 


File Finder is for those of you 
who keep lots of programs on 
a single Microdrive and cannot 
remember what you called 


1@@ REMark +* G. Garside AK 
119 REMark ** Automatic Basic File Selection ** 
12@ REMark SoS Sea SSS eS 
138 CLEAR:MODE 4 
148 WINDOW 512,256,@,9:PAPER @:CLS 
159 WINDOW #2,512,2@9,0,0:PAPER #2,0: INK #2,7 
166 dev$="mdvl_":fil$=devt & "temp" 
17@ OPEN_NEW #3,fil14 
18@ DIR #3,devs 
19@ OPEN_IN #3,fil¢ 
20@ f£=—3 
21@ REPeat loop 
220 IF EOF(#3) THEN EXIT loop 
230 INPUT +3,at% 
240 £f=£+1 
25@ END PEPeat loop 
260 DIM £4(f-1,20) 
279 OFEN_IN #3,fi1% 
28@ INPUT #3,vol#; sect 
296 k=@ 
3@G6 POR j=@ TO F-1 
316 INPUT #5,f£2(i) 
3224 REPeat loop 
330 IF f¢(k)="temp" THEN EXIT loop 
34 TF “dar INSRR 43:¢k)e LAE Nek x tT 
359 IF "_aba" INSTR f£#(k) THEN EXIT 
362 IF “_bin” INSTR £$(k) THEN EXIT 
378 ti Sscns LENSER feo) TAENe Ber 
382 IF “_dbf" INSTR £4(k) THEN EXIT 
398 k=k+1:EXIT loop 
420 END REPeat loop 
END FOR j 
f=k 
CLOSE #3 
DELETE fils 
OPEN #3,scr_51ZxZ2Za@x@: INK #3,2:BORDER #3,1,7 
OPEN #4,scr_512xZ2a@x234: BORDER #4,1,2 
’ WINDOW 512,212,9,22 
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CSIZE #3,3,1:AT #3,8,2:PRINT #3,vol$; 
CSIZE #3,0,9:AT #3,0,65:PRINT #3,f£;" Files"; 
AT #3,1,65:PRINT #3,sect$; 

IF £>26 THEN 

AT #4,0,4: INK #4,7:PRINT #4,"<";CHR$(191);">" 


INK #4,4:PRINT #4," or "; 
INK #4,7:PRINT #4,"<";CHR$(198); ">"; 

INK #4,4:PRINT #4," to change Page" 

END IF 

INK #4,7:AT #4,1,4:PRINT #4,"“A>"; 

INK #4,4:PRINT #4," to "; 

INK #4,7:PRINT #4,"< >"; 

INK #4,4:PRINT #4," to select File";TO 44; 
INK #4,7:PRINT #4,"<*F5>"; 

INK #4,4:PRINT #4," to Quit" 

pg=@: pm=INT(£/27) 

REPeat loop 

i=@:k=4:1=4 

REPeat loopl 


676 IF £>26 THEN AT 1,5:INK 2:PRINT"“Page ";pgt+1 
689 j=pg*Z6+i 

699 IF j>f-1 THEN EXIT loop1l 

78D IF i>25 THEN EXIT loopi 

71 IF i>12 THEN k=44:1=-9 


AT i+1,k: INK, 7:PRINT “<‘; CHRS(i+65); °>";TO k 


INK 4:PRINT £$(i+26*pg) 
i=i+l 

END REPeat loopl 

AT #4,1,12:INK #4,7:PRINT #4,CHRS$(64+i); 
REPeat loop2 


78D z=CODE (INKEY$(-1)) 

796 SELect ON z 

BSG =65 TO 98,97 TO 122 

818 IF z2>9@ THEN z=2-32 

820 IF 2<i+65 THEN 

830 Fil$=f£$(z-65+26*pg) 

840 EXIT loop 

85a END IF 

860 =288 

87D IF pg>@ THEN pg=pg-1:EXIT loop2 
88S =216 

898 IF pg<pm THEN pg=pg+1:EXIT loop2 
98GB =250 

916 CLOSE #3:CLOSE #4 

926 WINDOW 512,256,8,@:CLS 

938 CLS #8 

94G NEW 

958 END SELect 

960 END REPeat loop2 

976 CLS 


98 END REPeat loop 
996 WINDOW 512,256,%8,@8:CLS 
1900 LRUN dev$ & fil¢ 


This stategy game plays on the 
popular idea of an old galactic 
Empire divided between Im- 
perial ideals and the Rebel 
Forces. Using largely text and 
adventure problems, the aim is 
to lead the rebel forces to vic- 
tory and form the second Em- 
pire; also discovering the loca- 


tion of the mysterious second 
Foundation — the one system 
that owes its allegiance to no- 
one, except the future Empire. 

Before you run the program 
type WINDOW 512, 256, 0, 0, 
the game must be played in 
lower case. 


REMark ### COSMIC REVOLUTION ### 


REMark ###### A.DIDCOCK ###### 


REMark 


REPeat game 
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‘2.22:PRINT #S,"ARMED UNITS: 


200 initialise 

210 f_level 

220 set_up_screen 
229% 

300 REPeat main_loop 


310 user_input 

315 IF end_g THEN EXIT main_loop 

320 prob=INT((100/(tot_h+tot_c))*tot_h) 

325 IF gol=0 THEN 

330 computer_action 

340 prob=INT((100/(tot_h+tot.c))*tot_h) 

350 END IF 

360 IF tot_h<=0O OR tot_c<=0 OR ar(base)=tot_c THE 


N EXIT main_loop 

380 year=year+1E-2 

38S gol=gol+1:IF gol>=lev THEN gol=0 

390 END REPeat main_loop 

400 end_game 

410 END REPeat game 

999 ; 

1000 DEFine PROCedure user_input 

1010 INK #5,2:CSIZE #5,2,0:CLS #5 

1020 UNDER #5,1:AT #5,0,14:PRINT #5,"MAIN MENU':UN 


‘DER #5;0 

1030 INK #5>4 

1040 AT #5,1,4:PRINT #5,"1: GENERAL INFORMATION" 
1050 AT #5,2,4:PRINT #5,'"2: ATTACK" 

1060 AT #5,3,4:PRINT #5,"3: DEFEND" 

1070 AT #5,4,4:PRINT #5,"4: OTHER" 

1080 INK 7:CSIZE 2,0:STRIP 1:AT 23,8:INPUT "PLEASE 


ENTER OPTION NO. 
1085 BEEP 1000;40 
1090 IF opt<1 OR opt>4 THEN GO TO 1010 
1100 SELect ON opt 
1110 =1:information 
1120 =2:attack 
1130 =3:defend 
1140 =4:other 
1150 END SELect 
1160 END DEFine 
1999 : 

2000 DEFine PROCedure information 

2010 CLS #S:INK #5,2:UNDER #5,1:AT #5,0,10:PRINT # 
5,"GENERAL INFORMATION" :UNDER #5,0 

2020 INK #5,4 

2030 AT #5,2,S5:PRINT #5,"DATE: ";year 
2040 AT #5,3,5:PRINT #5, "PROBABILITY OF VICTORY: 
1) ;Prob; nee ; 

2042 AT #5,4,5:PRINT #5,"TOTAL REBEL FORCE (UNITS) 

= "stot_h 

2045 call_system 
2046 INK #5,7:FLASH #5,1:AT #5,5,21:PRINT #5,"PRES 
S ANY KEY":PAUSE 40000:BEEP 1000,20:FLASH #5;0 
2047 END DEFine 
2048 : 

2049 DEFine PROCedure call_system 

2050 INK 7:AT 23,3:INPUT “ENTER REQUIRED SYSTEM CO 
-ORD: ";no$; 

2060 BEEP 1000,30. 

2070 cde=CODE(no$) 

2080 IF cde<49 OR cde>102 OR (cde<97 AND cde>S7) T 
HEN GO TO 2050 

2090 IF cde<S58 THEN sys=no$: ELSE sys=(cde-87) 
2095 IF sys>15 THEN GO TO 2050 

2100 CLS #S:INK #S,2:UNDER #5,1:AT #5,0,14:PRINT # 
5,"SYSTEM '";no$;"'":UNDER #5,0 

2110 INK #S,;3;6 

2120 AT #S,2,1:PRINT #5,"NAME: ";name$(sys):AT #5, 
Wwan(sys)is 4% 
AT #5,3,1:PRINT #5,'"NUMBER OF PLANETS: 


"opt; 


2130 ws pits 
ys) 

2140 AT #554,1:PRINT #5;"STATUS: 
2160 END DEFine 

29992 
3000 DEFine PROCedure attack 

3010 CLS #S5:INK #5,2:UNDER #5,1:AT #5,0,13:PRINT # 
S,"MODE: ATTACK":UNDER #5,0 ; 

3020 INK 7:AT 21,3:INPUT “Enter the system to atta 
ck: “"sinoS: 

3030 BEEP 1000;20 

3040 cde=CODE (nos) 

3050 IF cde<49 OR cde>102 OR (cde<97 AND cde>S7) T 
HEN GO TO 3010 

3060 IF cde<58 THEN sys=no$: ELSE sys=(cde-87) 
3070 IF sys>15 THEN GO TO 3010 

3075 IF £(sys)=4 OR f£(sys)=6 OR £(sys)=12 THEN GO 
TO 3010 


";des$(sys) 


Continued on page 52 
51 


Continued from page 51 


3080 CLS #S:INK #S,2:UNDER #5,1:AT #5,0,13:PRINT # 
5,"MODE: ATTACK":UNDER #5;0 

3090 INK #5,3;6 

3100 AT #5,1,0:PRINT #5,"SYSTEM '";no$;"'":AT #552 
»1:PRINT #5,"NAME: ";name$(sys):AT #5,3,1:PRINT #5 
»"ARMED UNITS: ";ar(sys) ;"Z" 

3110 AT 23,3:INPUT "Enter the attacking system: "; 
no$; . 

3120 BEEP 1000,10 

3130 cde=CODE(no$) 


3140 IF cde<49 OR cde>102 OR (cde<97 AND cde>S57) T 


HEN GO TO 3110 

3150 IF cde<58 THEN syt=no$: ELSE syt=(cde-87) 

3160 IF syt>1S THEN GO TO 3110 

3170 IF f(syt)<>4 AND f(syt)<>6 AND f(syt)<>12 THE 

N GO TO 3110 

3180 CLS #5:INK #5,2:UNDER #5,1:AT #5;0,13:PRINT # 

5,"MODE: ATTACK":UNDER #5,0 

3190 INK #5;4;6 

3200 AT #5;1,0:PRINT #5,"SYSTEM '";no$;"'":AT #5,2 
»1:PRINT #5,"NAME: ";name$(syt):AT #5,3,1:PRINT #5 
»"ARMED UNITS: "sar(syt);"Z" 

3210 dist=SQRT(((co(syt,1)-co(sys,1))*(co(syt,1)-c 

o(sys,1)))+((co(syt,2)-co(sys;2))*(co(syt,2)-co(sy 

$.2)))) 

3220 distl= see as) (dis 

3230 AT #5,4,1:PR xf 
M = Dias en 

3240 INK #5;7:FLASH #5,1 

3245 AT #5,5,8:PRINT #S,"PRESS ANY KEY TO ATTACK": 

FLASH #5;0 

3250 PAUSE 40000:BEEP 1000,1 

3260 CLS #S:INK #5;6,2:FLASH #5,1 

3270 AT #5,1,3:PRINT #S,name$(syt);" IS ATTACKING 
";name$(sys):FLASH #5,0 

3280 dec=INT(ar(syt)-(dist1/2.5)) 

3282 INK S,1:LINE co(syt,1),co(syt,2) TO co(sys,1) 
»co(sys,2) 

3285S INK #5S,2:art=ar(sys) :ary=ar(syt) 

3286 rand=RND(O TO 10) :won=0 

3287 FOR i=1000 TO O STEP -3:BEEP 100,i/10,25,25,0 
»O:END FOR i 

3290 IF ((rand<10 AND dec>=ar(sys)) OR rand=0O OR b 

ase=syt) AND base<>sys THEN 

3295 INK 2:LINE co(syt,1),co(syt:2) TO co(sys;1), 

co(sys,2) 

3300 des$(sys)=des$(syt):f(sys)=f£(syt) 

3310 ar(sys)=INT(ar(sys)*.6):ar(syt)=INT(ar(syt) * 
-8). 

3320 AT #S,3,3:PRINT #5,name$(syt);" HAS DEFEATED 
";name$(sys) 

3330 tot_h=tot_h+(ar(sys)+ar(syt) )-ary:tot_c=tot_ 

c-art 

3332 IF tot_c<1 THEN tot_c=0 

3335 won=1 

3340 END IF : 

3350 IF ((rand=10 AND ar(sys)>0) OR dec<ar(sys)OR 

base=sys) AND NOT won THEN 

3355 INK 7:LINE co(syt,1),co(syt,;2) TO co(sys;1), 

co(sys:;2) 

3360 des$(syt)=des$(sys):f(syt)=f(sys) 

3370 ar(syt)=INT(ar(syt)*.6):ar(sys)=INT(ar(sys)* 
-8) 

3380 AT #5,3,3:PRINT #5,name$(sys) ;" HAS DEFEATED 
";name$(syt) 

3390 tot_c=tot_c+(ar(sys)+ar(syt))-art:tot_h=tot_ 

h-ary 

3395 IF tot_h<i THEN tot_h=0 

3400 won=l1 

3410 END IF 

3420 IF NOT won THEN GO TO 3286 

3430 INK #5,7:AT #5,5,9:PRINT #5,"PRESS ANY KEY" 

3440 PAUSE 40000:BEEP 1000,60 

3450 END DEFine 

3999 : 

4000 DEFine PROCedure defend 

4010 CLS #5:INK #5,2:UNDER #5,1:AT #S,0,13:PRINT # 
S,»"MODE: DEFEND":UNDER #5,0 

4020 INK 7:AT 21,3:INPUT "Enter the system to defe 
nd: ";no$; 

4030 BEEP 1000;20 

4040 cde=CODE(no$) 

40S0 IF cde<49 OR cde>102 OR (cde<97 AND cde>57) T 

HEN GO TO 4010 

4060 IF cde<S8 THEN sys=no$: ELSE sys=(cde-87) 


o 
95/4) } stance FROM ENEMY SYSTE 
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4070 IF sys>15 THEN GO TO 4010 

4080 IF f£(sys)<>4 AND f(sys)<>6 AND f(sys)<>12 THE 
N GO TO 4010 

4090 CLS #S5:INK #5,2: UNDER #5,1:AT #5,0,13:PRINT # 
S,"MODE: DEFEND":UNDER #5,0 

4100 INK #5,2;6:AT #5,2,1: BRINE #S,name$(sys);'" HA 
D “;ar(sys);"% ARMED UNITS. 

4110 ar(sys)=ar(sys)+10:tot_h=tot_h+10 

4120 IF ar(sys)>100 THEN tot_h=tot_h-(ar(sys)-100) 
:ar(sys)=100 

4130 INK #5,6:AT #5,3,1:PRINT #5,name$(sys) ;'' NOW 
HAS "j;ar(sys);"% ARMED UNITS" 

4140 INK #5,2:AT #5,4,1:PRINT #5,"TOTAL REBEL FORC 
E (UNITS) IS NOW ";tot_h 

4150 INK #5,7:AT #5,5,13:PRINT #5,"PRESS ANY KEY" 

4160 PAUSE 40000 

4170 BEEP 1000,10 

4180 END DEFine 

4999 : 

S000 DEFine PROCedure other 

5010 CLS #5:INK #5,2:UNDER #5,1:AT #5,0,14:PRINT # 
S,"MODE: OTHER":UNDER #5,0 

5020 INK #5;4 

S030 AT #5,1,4:PRINT #5,"1: RESEARCH and DEVELOPEM 

ENT" 

5040 AT #5,2,4:PRINT #5,"2: DEPLOY" 

SO50 AT #5,3,4:PRINT #5,"3: HELP" 

S060 AT #5:4,4:PRINT #5,"4: SURRENDER" 

5070 INK 7:CSIZE 2;0:STRIP 1:AT 23,8:INPUT "PLEASE 
ENTER OPTION NO. ";o0pt; 

5080 BEEP 1000,40 

5090 IF opt<1 OR opt>4 THEN GO TO 5010 

5100 SELect ON opt 

5110 =1: research 

5120 =2: deploy 

5130 =3: help 

5140 =4: end_g=1:tot_h=5 

S150 END SELect 

5160 END DEFine 

§999 : 

6000 DEFine PROCedure research 

6010 CLS #5:INK #5,2:UNDER #5,1:AT #5,0;7:PRINT #5 
»"RESEARCH and DEVELOPEMENT": UNDER #5,0 

6020 INK #5,4 

6030 AT #5,2,4:PRINT #5,"1: WEAPON SYSTEMS" 

6040 AT #5,3,%:PRINT #5,"2: STAR SHIPS" ‘ 
6050 AT 23,7:INPUT "Enter the required area: "j;o0pt 


, 

6060 BEEP 1000,;,30 

6070 IF opt<1 OR opt>2 OR devel_h=opt THEN GO TO 6 
010 

6080 devel_h=opt 

6090 END DEFine 

6099 : 

6100 DEFine PROCedure deploy 

6110 CLS #5:INK #5,2:UNDER #5,1:AT #5,0,15:PRINT # 
S,"DEPLOY":UNDER #5;0 - 

6115 INK #554 

6120 IF devel_h=O THEN AT #5,3,7:STRIP #5,2:FLASH 
#5,1:PRINT #5;"WE HAVE NOTHING TO DEPLOY":FLASH #5 
»O:STRIP #5,1:PAUSE 300:RETurn 

6130 AT #5,2,4:PRINT #5,"15 WEAPON SYSTEMS" 

6140 AT #5,3,4:PRINT #5,"2: STAR SHIPS" 

6150 AT 23;1:INPUT "Enter the required system to D 
EPLOY: "j;o0pt; 

6160 BEEP 1000;,10 

6170 IF opt<1 OR opt>2 OR devel_h<>opt THEN GO TO 
6110 

6180 CLS #5:INK #5;2:UNDER #5,1:AT #5,0,15:PRINT # 
S,"DEPLOY":UNDER #5,0 

6190 AT 20,3:PRINT "Which star SYSTEM is to be":AT 
21,3:INPUT "re-equiped? ";no$; 

6200 BEEP 1000,50 

6210 cde=CODE(no$) 

6220 IF cde<49 OR cde>102 OR (cde<97 AND cde>S7) T 

HEN GO TO 6180 

6230 IF cde<58 THEN sys=no$: ELSE sys=(cde-87) 
6240 IF sys>15 OR dep(sys)<>O THEN GO TO 6180 

6245S IF £(sys)<>4 AND £(sys)<>6 AND f(sys)<>12 THE 

N GO TO 6180 

ae CLS #5:INK #5,2:UNDER #5,1:AT #5,0,15:PRINT # 

»"DEPLOY":UNDER #5,0 ; 

aes INK #5,3,6:AT #5,1,1:PRINT #57 NAME? ";name$ ( 
sys) 

6270 AT #5,2,1:PRINT #5,"TO BE RE-EQUIPED WITH "; 
6280 IF opt=1 THEN PRINT #5»"WEAPON SYSTEMS" :ar(sy 
sS)=ar(sys)+20:tot_h=tot_h+20 
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6290 IF opt=2 THEN PRINT #5,"STAR SHIPS": ar(sys)=a 

r(sys)+15:tot_h=tot_h+15 

6300 IF ar(sys)>100 THEN tot_h=tot_h-(ar(sys)-100) 
tar(sys)=100 3 

6310 dep(sys)=opt 

6312 AT #5,3,1:PRINT #5,"ARMED UNITS NOW ";ar(sys) 
aoe au 

6320 INK #5,7:AT #5,5,;12:PRINT #S;"PRESS ANY KEY": 

PAUSE 40000:BEEP 1000,20 

6330 END DEFine 

6999 : 

7000 DEFine PROCedure computer_action 

7OQ7 i=O:k=0 

7010 CLS #5:INK #S,;6:UNDER #5,1:AT #5,0,12:PRINT # 
5,"BATTLE REPORT": UNDER #5,0 

7020 INK #5,2 

7O2S INK #5,2:AT #5,2,3:PRINT #S,"DATE: “;year: 
7026 count=O0:INK #5:4:wa=RND(1 TO 10):IF wa<S THEN 
w=1:ELSE w=-1 ; 

7027 IF w=1 THEN ww=1 :wi=15 :ELSE ww=1S5:wi=1 

7030 REPeat compute 

7040 FOR i=ww TO wi STEP w 

7050 IF £(i)=4 OR £(i1)=6 OR £(i)=7 OR £(i)=8 OR 
€(i)=12 OR £(i)=1 THEN GO TO 7130 

7060 st=ar(i) 

7070 IF st<30+(count*10) THEN defend_c:RETurn 
7080 jJ=INT(st/7) 

708S IF i+j>16 OR i-ji<O THEN j=j-1 : GO TO 7085 
7086 IF count>O THEN EXIT i 

7090 FOR k=(i+j) TO (i-j) STEP -1 

7100 IF £€(k)<>4 AND £(k)<>6 AND £(k)<212 THEN G 
Oo TO 7120 

7110 IF ar(k)+8<st OR ar(k)=tot_h THEN attack_c 
:RETurn ; 

7120 END FOR k 

7130 END FOR i 

7140 count=count+1 

7150 IF count>7 THEN EXIT compute 

7160 END REPeat compute 

7170 INK #5;3,0:STRIP #5,7: FLASH #5,1:AT #554,11:P 
RINT #5,"NO ENEMY ACTION!":FLASH #5,0:STRIP #5,1 
7172 BEEP 10000;5 

7175S PAUSE 200 

7180 END DEFine 

TATE) 

7200 DEFine PROCedure defend_c 

7210 ar(i)=ar(i)+10:tot_c=tot_c+10 

7220 IF ar(i)>100 THEN tot_c=tot_c-(ar(i)-100) :ar( 
i)=100 

7230 AT #5,3,3:PRINT #5,name$(i);" HAS BEEN REINFO 
RCED" 

7240 AT #5,4,3:PRINT #5,"ARMED UNITS: "sar(i);"Z"; 
ti (SYSTEM "31 ;*)" 

7250 INK #5,7:AT #5,5,12:PRINT #5,"PRESS ANY KEY" 
7260 PAUSE 40000 

7270 BEEP 1000,10 

7280 END DEFine 

7299 3: 

7300 DEFine PROCedure attack_c 

7310 dist=SQRT( ((co(i,1)-co(k,1))*(co(i,1)-co(k,1) 
))+((co(i,2)-co(k,2))*(co(is2)-co(k,2)))) 

7320 dist1=ABS(INT(dist/2) ) 

7330 INK #5,6,2:FLASH #5,1 

7340 AT #5,1,3:PRINT #5,name$(i);" IS ATTACKING "; 

name$(k):FLASH #5,0 

7350 dec=INT(ar(i)-(dist1/2.5)) 

7355S INK 5,1:LINE co(k;1),co(k+2) TO co(i,1),co(i, 

2) 

7360 INK #5,2,S:art=ar(i):ary=ar(k) 

7370 rand=RND(O TO 10):won=0 

7380 FOR j=1000 TO O STEP -3:BEEP 100,i/10,25,25,0 
»O:;END FOR j 

7390 IF (rand<10 AND dec>=ar(k)) OR rand=0O THEN 

7400 des$(k)=des$(i):f£(k)=£(1) 

7410 ar(k)=INT(ar(k)*.6):ar(i)=INT(ar(i)*.8) 

7430 AT #5:3,3:PRINT #5,name$(i);" HAS DEFEATED " 
;name$(k) 3 

7435S INK 7:LINE co(k,1),co(k»2) TO co(is1),co(i,2 
) 

7440 tot_c=tot_c+(ar(k)+ar(i))-art:tot_h=tot_h-ar 

y 

7445 IF tot_h<1 THEN tot_h=0 

7450 won=1 

7460 END IF 

7470 IF ((rand=10 AND ar(k)>0) OR dec<ar(k)OR base 

=k) AND NOT won THEN 

747S INK 2:LINE co(k,1),co(k,2) TO co(i;,1),co(i,2 
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7480 des$(i)=des$(k):£(1i)=£(k) 

7490 ar(i)=INT(ar(i)*.6):ar(k)=INT(ar(k)*.8) 

7500 AT #5,3,;3:PRINT #5,name$(k);"' HAS DEFEATED " 
j;name$(i) 

Lee tot_h=tot_h+(ar(k)+ar(i))-ary:tot_c=tot_c-ar 


7520 IF tot_c<1 THEN tot_c=0O 

7530 won=1 

7540 END IF 

7550 IF NOT won THEN GO TO 3286 

7560 INK #5,7:AT #5,5,12:PRINT #5,"PRESS ANY KEY" 
7570 PAUSE 40000:BEEP 1000,;60 

7580 END DEFine 

7999 : 

8000 DEFine PROCedure help 

8010 CLS #S:INK #5,2:UNDER #5,1:AT #5,0,13:PRINT # 
S,"MODE: HELP":UNDER #5,0 

‘8020 INK #5,;5;3 

8030 IF prob>SO THEN 

8040 AT #5,3,5:PRINT #5,"YOU SEEM TO HAVE NO PROB 
LEM!" 

80SO INK #5,7:AT #5,5,12:PRINT #5,"PRESS ANY KEY" 

8060 PAUSE 40000:BEEP 1000,1,200,60,50,60 

8070 RETurn 

8080 END IF 

68090 IF. prob<51 AND prob>10 THEN 

8100 AT #S;2,1:PRINT #5,"YOUR CRISIS HAS BEEN ANT 
ICIPATED «. ...." 

8110 INK #5,5,2:AT #5,3,2:PRINT #5,"'I suggest th 
at you set up a union.'" 

8120 INK #5,7:AT #5,5,12:PRINT #5,"PRESS ANY KEY" 

8130 PAUSE 40000:BEEP 1000,1,200,60,50,60 

6140 RETurn 

86150 END IF 

8160 IF prob<1il THEN AT #5,3,7:PRINT #5,"I THINK Y 

OU SHOULD QUIT!":GO TO 8120 

8170 END DEFine 

9999 : 

10000 DEFine PROCedure set_up_screen 

10010 WINDOW 512,256,0,0 

10020 SCALE 100;0;0 

10030 OPEN #4,scr_500x15a6x5 

10040 OPEN #5,scr_480x70a16x180 

100SO0 PAPER O:BORDER 5,5:CLS 

10060 PAPER #4,;4:BORDER #4,2,2:CLS #4 

10070 PAPER #5,1:BORDER #5,1;,7:CLS #5 

10075 INK #4,2,1 

10080 CSIZE #4,3,0:AT #4,0,6:PRINT #4,"COSMIC REV 

OLUTION" 

10085 INK 7:FOR i=1 TO 100:POINT RND(O TO 148),RND 
(30 TO 93) 

10086 col=9 

10090 FOR i=1 TO 15 

10100 co(i,1)=col:co(i,2)=INT(RND(37 TO 87)) 
10110 INK 6:FILL 1:CIRCLE co(i,1),co(i,2),.S:FILL 
o 


Sharp eyed readers will notice _ Issue. here are the missing lines, 
we lost a small part of 3D together with our apologies. 
Noughts and crosses in the July : 


360 FOR i = 1 TO 76 

370 IF path_value(i) = me% * 3 THEN RETurn find_sq 
uare (i) 

380 IF path_value(i) = youZ% * 3 THEN p% = i 

390 END FOR i 

400 IF pZ > O THEN RETurn find_square (pZ) 

410 END IF 

420 maxval = -1 : sqZ = 0 


430 FOR i = 1 TO 64 


440 IF boardZ(i) = 0 THEN 

450 val = O : my2_countZ = 0 : your2_count% = 0 
460 FOR j = 1 TO sq_to_pathZ(i,0) 

470 Pathv = path_value(sq_to_pathZ(i,j)) 

480 IF pathv <> deadZ THEN 

490 IF pathv = 2 * me% THEN my2_count% = my2 
_count% +1 
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MICRODRIVE 


EXCHANGE 


Program of the Month 


Starting in this issue, every month Microdrive Exchange 
will feature a Program of the Month. From the software 
published in The Progs we will select one program of 
outstanding quality for inclusion in the Microdrive Ex- 
change. 

Program of the Month for August is Mushyman, by J 
M Dower, A SuperBasic arcade game which appeared in 
the June and July Issues of Sinclair QL World. 

Because of the faster turnround of software on Micro- 
drive Exchange, we may no longer be able to feature 
programs for the length of time which has been possible 
in the past. Where a program is about to be deleted from 
the list, we will try to warn readers in the previous issue 
but, to make sure of your order, we suggest you send the 
form as soon as possible. 


HOW TO ORDER 


Listed below are programs which have appeared as 
listings inside QL World/QL User and Sinclair QL 
World. 

To the right of each program entry is a small box, 
which you should mark with a bold cross if you want 
to order that program. 

Once you have put a cross next to all the programs 
you wish to have copied onto microdrive, simply com- 
plete the rest of the order form and send it along 
with your PO/cheque AND BLANK FORMATTED DRIVE 
to: 

MICRODRIVE EXCHANGE, 

Sinclair QL World, 

79-80 Petty France, 

London SW1. 

If you wish us to supply the drive, please add an 
extra £2.50 for every drive required and mark the 
order form appropriately. 

Please allow 28 days for delivery. 


ORDER FORM 


Author Language Program Name Price Issue Size 
Giles Todd (b) DIY Assembler £5.00 Mar/lun §=120[_] 
Converts Assembler source into m/c object code 


Richard Cross (AQ) Mini Monitor £3.00 Oct 60[_] 
Pocket sized monitor with comprehensive facilities 


A Didcock (B) Connect4 £1.00 Sept 15{ | 
Pit your wits against the QL 


Shergold & Tose (B) *Golf £2.00 May 35[ ] 


From fairway to green on 50 different courses of varying difficulty 


Williams & Holliday (AO) Paladin £5.00 Apr 70[ | 
The basis of our games programming series — a space invaders type game written entirely machine 
code 


Richard Cross (MB) Sprite Animation £2.00 Apr 50[_] 
A subtle blend of machine code and SuperBasic that produces a versatile sprite designer and high 
speed animator 


SS SE 
Steve Deary (B) Pacman § £1.00 Mar 20/ | 
A reasonably fast rendition of the famous arcade favourite 


Andy Carmichael (B) Family Tree £3.00 Aug 100[ | 
Archive program and database for setting up and displaying large family trees 


James Lucy (B) Composer £3.00 Oct 50[ | 
Composer and play sheet music on the QL 


JM DOWER (B) Mushyman £2.00 


Mushroom munching arcade action. 


PJ Smith (B) *DIY Adventure £1.00 Feb 60[ | 
Askeleton framework where you simply have to slot in the details to create your bespoke adventure 


RGreen (B) Qthello £1.00 Aug 25( | 
A 3D version of the well known board game Othello for one or two players 


SJ Ackers (B) *Touch Type £4.00 Aug 80/] 
Touch typing course — 14 lessons, on-screen keyboard, 800+ word vocabulary and WPM readout 


Rob Sherratt (AQ) FCOPY £4.00 Mar’86 80[ | 
A machine code microdrive utility for turbocharged file copying | 


Alan Prior (B) World Map £2.00 Mar ’86 80[_] 
A high resolution multi-coloured map of the world for geography buffs 


B = SuperBasic, AO = Assembler + Object Code (ready to run), MB = Machine Code 
+ Basic loader 


Jun/Jul’86 15] 


- Name 


Address 


No of programs ordered 

Total sectors 

(max 200 per drive) 

No of drives sent A 

No of drives required @ £2.50each £ 
Pius postage — packing £ 


Subtotal £ 
Add VAT @ 15% 


TOTAL TO BE SENT 


Please copy onto microdrive the programs above which I have indicated with 
a cross. | enclose a cheque/PO to the value of £ ......... (made payable to 
QL World). | understand that Sinclair QL World only undertakes to SUPPLY 
these programs (copied onto microdrive) and accepts no liability for their 
operation as defined by the author. Neither can Sinclair QL World supply 
additional information about any of the listings other than that originally 
printed. Any article reprints required must be ordered and paid for separately 
at £1 each inclusive of post and packing (£2 overseas). Please mark the 


y envelope Dept. LB. 


ICRO 


A 


DS 


COMPUTER CLEANERS 


STOP LOCK-UPS AND DATA CORRUPTION 
if this is due to mains interference then our plugs may be the answer 
As well as cutting high voltage spikes they smooth the cut spikes and filter 
RF interference from 1 to 30 MHZ (better than 30db) and up to 130 MHz. 


Some customer comments: 
“With the cleaner ... (locking up) ... 


is no problem now” — Electrical engineer. 


... these computer cleaners work" — Computer user group. 


“ ,.. the device is the answer ... 
“Lock-ups are cured” — Golf Club QL. 


ADAPTOR -— 1 three pin socket .... 


ADAPTOR - 2 three pin sockets 
TRAILING 4-WAY SOCKET 


(loading problems)” — BBC owner. 


.... £14 inclusive 
. £18 inclusive 
.. £24 inclusive 


Simply plug in — no wiring required. 
TONY FIRSHMAN SERVICES 
43 Rhyl Street, London NW5 3HB. 01-267 3887 


IF YOU‘VE SPENT £200 ON A 
PRINTER WHY NOT SPEND £200 
AND MAKE IT PRINT PROPERLY? | 


INK-WELL. A font editor and print utility for the QL. 
| Works with all Epson compatible dot matrix printers. 
16 x 16 font designer. Comes with manual and 8 
fonts. Prints with proportional or equal spacing. 
Works with QUILL and other text editors. 100% 
machine code. 
Send S.A.E. for details. 
Or £3.00 (refundable) for manual 
and demo version. 
Fully operational version and manual only: 


£9.95 inc. p&p. Send Cheque/P.O. to 


PALANTIR PRODUCTS 
60 St. Lukes Rd., 
Bedminster, Bristol. 


ARCHIVE NOT FAST ENOUGH 
NOT ENOUGH CAPACITY? 


Using the C programming language and BTree techniques | 
can convert your Archive applications into stand-alone pro- | 
grams that run much faster, with virtually no limitation on 
the number of records (files up to the size of the storage 
medium). 
Demonstration programs available on disk or Microdrive. 
L. F. HELLER, 
65 Flanders Mansions, Flanders Road 


London W4 1NF Tel: 01 994 7976 


66% OFF RIBBONS 


Why pay £££s for a new fabric ribbon 
cassette when we can re-ink your old one 
at A THIRD OF THE PRICE? 1 


Post cassette, stating printer make and 
model and enclosing one third of the price 1 
of a new one 
(minimum £1), to: 


ALADDINK, (Dept. QL), 4 Hurkur Crescent, | 
Eyemouth, Berwickshire, TD14 5AP. 


INTRIGUED by science and fractals? 
Mandelb Rot Set and Newtonian Grav- 
ity Simulation in fast machine code £7 
each, £11.50 pair Inclusive. CWO 
Transtech 324 Yorktown Road, College 
Town, Camberley, Surrey GU15 4PZ 


feeesccasartezsasans 


|Q-PROM 


£69.95 
EPROM PROGRAMMER 
Resident s’ware. CHECK, READ, FAST BLOW, 
VERIFY, 2764/128 


} Add’| EPROM for 27256 £14.95. Q-CART EPROM 


reader £5.95, Demo EPROM £4.95, EPROM eraser 


} £22.95, RS232C programmer 2716-512 £189.95. 


EPROMs, CHEAP. All prices + VAT 
CAMEL PRODUCTS 
One Milton Road, Cambridge CB4 1UY 
Tel: (0223) 314814 Telex: 81574 CML 


OPD/QL FILE 
INTERCHANGE 


Give your QL the capability of reading and 


writing files on microdrive cartridges that 
are in the format used by the ICL OPD (and 
the Merlin TONTO. Transfer XCHANGE and 


SuperBasic files between the OPD and QL. 


Available for £15 inc. P&P from: 
D. J. WALKER, 22 Kimptons Mead, 
Potters Bar, Herts EN6 3HZ 
or send SAE for full details. 


| VOTRE SOURCE 


Spectrum & QL 
en Suisse... 


Semaphore boutique 
6 Terrassiere, Eaux-Vives (GE) 


35.19.22 (022) 


| Mail Order 


Cc. P. 32 
1283 La Plaine GE 


kk U.S.A kw 


We have purchased the complete American inventory of 


| American QLs from Sinclair Research and now hold the sole 


distribution rights. 
We are looking for hardware and software products for our 
dealers in the U.S. 


A + COMPUTER RESPONSE 

69B ISLAND ST., KEENE N.H. 03431 U.S.A. 
Tel: (603) 357 1800 

Telex. 6502946407 via MCI/WUI 

(Western Union International) 


AMERICAN DEALER ENQUIRIES WELCOME 


=, EL. SOF TARE | 


Sevsseesesesasee 


iT re THE FULLY Beitr 


TCS COMMANDS SCREEN Ihe i is 
MPS ; PRINT SPOOLER PND AN ON SCREEN NOTEPAD a 


MRACTER TOOL ET $8 £76 ESIGN AN USE YOUR OWN 5 
HARACTER SETS JUST regal THIS ONE ADDS THAT SPECIAL TOUCH TO PROGRAMS 


aS Tok 


£63 THIS PHOKAGE CONTAINS ALL YO 


WEED 7 TO PROGUCE OLR a2 ARCADE GAMES ps eoall CAN HAVE uP a area ULL 


tui- peal SSsrttes WUTC row ac BUTCH 


E SCREEN TO STA 
UT YOU CAN EASILY PROGRAM | 


RT YOU OFF we TRELUDE 


MOOTHLY Mm 


SOME SPRITES CIE YOU SEE Soi 


WOUR OWN ALSO INCLUDED ARE ROUTINES 


LOB FS THe 


Sinclair/QL World August 1986 


Jf27F ALL THREE TOOLKITS ON ONE" 
ARTRIOGE SO GOOD WE USED IT TO PROOUCE THIS ADVERT 
PUBBERIZED ASTEROIOS GARE 166 MC cone {9} 


SEMO CHERSES OF Po TO 
SMILING SOFTWARE 26 OALE RORQ MARPLE STOCKPORT SKE GHA 


BUSINESS SOFTWARE 


These are friendly, independent, comprenensive and protessional database management systems using the Psion Run 
Time Module for Archive file compatability and machine code for speed 


C ARDFILE Personal, company and mail addresses with a general notes section. 
128K QL (44 fields)£14.95: 256K QL (25/21/8 fields) £19.95 
MAILFILE General details, mailing address and over 900 characters of notes. 
128K QL (25 fields)£14.95: 256K QL (25/21/8 fields) £19.95 
LIBRARIAN Far too many features for one line of explanation! Please call. 
128K QL (25 fields)£19.95: 256K QL (25/14/4 fields) £24.95 
Please include your QL’s specification on your Mail Order or with your SAE for details. 


| ARK DISTRIBUTION, 62 MANOR WAY, NORTH HARROW, MIDDX HA2 GBY (01-863 1861) 


Your Complete Sinclair Stockist 


Hardware, Software, Peripherals, 
Printers, Books, Magazines, Accessories 
P.O. Box 5607 @ Glendale, AZ 85312-5607 U.S.A. 
1-602-978-2902 @ Telex (via WUI): 6501267701 

DEALER INQUIRIES WELCOME 


YOUR PERSONAL CENTRONICS PRINTER 


plus| * DRAFT MATRIX PRINT 
£99 Vat | ° NEAR LETTER QUALITY 
e SUBSCRIPT SUPERSCRIPT 
plus £8 p+p ¢ CONDENSE EMPHASIZE 
° 96 CHAR + 48EURO +16 MATHS 
¢ GRAPHICS 
° OPTIONAL TRACTOR 


128 Station Rd 
Glenfield 
Leicester 
LE3 8BR 


SHADOW GAMES 


has moved to larger premises! Our comprehensive range of top-sel- 
ling games are available through the post or from selected Soci 
|ANOID: 


The ‘The indepentant QL users group 
* monthly newsletter (36/40 pages) 

* free advice * tutors (Archive etc.) 
%* massive software library (mostly free) 
%* supports for local groups 

* printer hotline 


Further details from Brian Pain, 24 Oxford St, Stony Strat- 
ford, Milton Keynes, MK11 1JU Tel: (0908) 564271 


£14.95, for a limited time only, the incomparable: PAINT MASTER. 
New titles will soon be announced. WATCH THIS SPACE! 


Good programmers ae always in demand. Let us publish your game. 
or utility. Write for details. 


SHADOW GAMES, 1/2 The Cottages, 
Maidenhatch, Tidmarsh, nr Reading, 
Berks RG8 SHP 


* workshops 


TOUCH TYPIST TYPING TUTOR FOR THE SINCLAIR QL 


Touch typist is the fastest typing tutor available for the Sinclair QL. It will teach you to type at up to 211 wpm 
with a fully interactive keyboard on the screen. It is 100% machine code, 85k long and has a keyboard tutorial, 
demo option, 3 teaching modes, adjustable targets to 211 wpm and 100% accuracy, very fast interactive 
keyboard, automatically scaling graph of results, results can be saved to drive, full lesson editor which will allow 
you to alter and customise any or all of the 200 lessons which can then be saved to drive to create a library 
of custom lesson sets, supplied on microdrive in 4 cartridge wallet. ONLY £11.95 
TOUCH TYPIST received a four star rating on QNET2, the reviewer Nigel Barker said “For all people who want 
to improve their typing this program is a real boon, it is well written and easy to use”. 

Touch Typist £11.95 3D Slime £12.50 Sign Designer £18.50 Assembler Workbench 
Cad Pak £14.50 QL Pail £25.00 Ram Disc £14.50 TechniQL 
Cartridge doctor £14.50 EyeQ £23.95 Super Media Manager 


SEND CHEQUES/POSTAL ORDERS TO 
SECTOR SOFTWARE, 45 CHEETHAM MEADOW, MOSS SIDE, LEYLAND, LANCS, PRS 3UB 
omen TEL: 0772 454328 PRESTEL MAILBOX: 772454328 
was ACCESS AND VISA CARDS WELCOME. PLEASE NOTE ALL PRICES INCLUDE P/P. | 


£23.50 
48.50 
£38.95 


THE BEST WAY TO 
SELL YOUR PRODUCT 


Is THROUGH /MICROADS _ 


CALL PAUL MONAF 
ON 01-222-9090 
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Your American Supplier 


If its available in the U.K., then its 
available in the U.S.A. from 
the QL Connection!” 


© Software ® Peripherals ¢ 
® Books @ Printers ¢ 


QL Connection 
15 Kilburn Court 
Newport, RI 02840 U.S.A. 
401/849-3805 


NUMBER ONE FOR QL REPAIRS 


FIRST STOP PAST THE END OF YOUR TETHER! 
Do your microdrives spin on forever? 
Does your keyboard ignore you? 
Then call Rainbow Digital Repairs for 
prompt, professional service. 
Prices range from £17.00 for a keyboard 
problem; to a maximum of £37.50 for 
some microdrive problems. 
All prices include VAT, Postage and 
packaging & insurance. 


Clark House, Haxby 

York, YO3 8HU 24hr courier return 

Tel: (0904) 768853 service available. 

24 hour answer service _—_ Overseas enquiries welcomed. 


* NEW SOFTWARE BARGAINS * 


GENERAL TOOLKIT (Extensions to Superbasic): 
Set up defaults like PSION packages using KEYQ#channel string. DEBUGGING: TRACE_ 
#channel — prints out current SuperBasic line number to specified channel. WINDOW 
CONTROL: CURS_X, CURS_Y, CURS_COL, CURS_ROW plus DEF_WIN which provides 
interactive window definition from Superbasic. PROGRAM CONTROL: IN_USE(#channel) 
and EXISTS(file$) each return either TRUE or FALSE. 
PRINT SPOOLER FOR QUILL (Print files in the background without leaving QUILL) 
MATRIX MATHEMATICS TOOLKIT: MX_ADD, MX_SUB, MX_MUL, MX_ZERO e.g. 
MX_MUL a,b,c performs the matrix calculation c = a x b, where a,b and c are suitably 
dimensioned floating point arrays. 
PLUS a machine code Breakout game, a simple terminal emulator and an example Superbasic 
program showing how to use Matrix Calculations to produce 3D pictures! 

Send S.A.E. for details, or cheque for £6.50 

payable to S.E.Q.L., + blank microdrive to 


S.E.Q.L., 9 Coulston Road, 
Lancaster LAi 3AD 


PROFESSIONAL PROGRAMS FOR BUSINESS USERS OF 


SINCLAIR QL 

PROJECT MANAGEMENT PROGRAM - Critical Path Method based program providing the User Project 
Management Tools for Time Study, Cost Study, Project Feasibility, Cash Flow, Profit/Loss Evaluation, Bar 
Chart, Manpower Utilisation, Progress Payment Computations. 
3D SPACE TRUSSES - Statical Analysis Program computing Member Forces, Support Reactions, Deflections 
under Multiple Loadings, Superpositions of Loadings to evaluate unfavourable loading conditions. 
2D RIGID FRAMES or TRUSSES - Statical Analysis Program computing the same magnitudes as for 3D 
but for 2D Frames of flexural Members or for 2D Trusses. 

Please write for free information: 


SOFTWARE Atelier, POB 148, 80002 Karakoy, Istanbul — TURKEY 


i! STOP I! 
oe FOR DETAILS 


4-way 13a trailing socket, lead, plug, @) N 
RF and spike filter — fused at 3A Max. 


SSM Ltd, 14, Mill Lane, MICRO ADS 
Benson, Oxford, OX9 6SA re ALL 


free your QL from mains interference 


NOW 
THE SINCLAIR QL 
HAS OUR 
FULL SUPPORT. 


A+Computer Response proudly announces 
their complete American support for the 
Sinclair QL and these fully authorized dealers: 


¢ Russel Electronics ®RMG Enterprises eT.F.l.ComputerProducts Sharp's inc. 
Red Mill Rd. 1419.5 Seventh St. 859 N. Virgil Ave. Route 10, Box 459 
Center Hall, PA 16828 Oregon City, OR 97405 Los Angeles, CA 90029 Mechanicsville, VA 23111 
814-364-1325 502-665-7484 213-669-1418 804-746-1644 

Curry Computer Foundation Systems Sunset Electronic ®@SCAD/ware 
5344 Banff Lane 17620 26 Mile Rd. 2254 Tarval St. Route 16, Box 37 
Glendale, AZ 85306 Washington, MI 48904 San Francisco, CA 94116 Church Creek, MD 21622 
602-978-2902 313-781-5800 415-665-8330 301-228-7910 

¢ Pyramid Electronics @ Harry S. Walters © Knighted Computers Brice Road Pharmacy 
2174 Gulf Gate Drive 1101 Bassick Rd. 707 Highland St. 1653 Brice Road 


Sarasota, FL33581 Trumbull, Ct. 06611 Fulton, NY 13069 Reynoldsburg, OH 43068 
813-922-9574 315-593-8219 614-861-3600 


A~* Computer Response 


Prompt, Professional Sales & Service 
69-B Island St. eKeene, N.H. 0341 @(603) 357-1800 


ADVERTISERS INDEX 


ABC Elektronic 

A* Computer Response 
Byte Back 

Care Electronics 
Chromographica 
Compware 


Digital Precision 
DS Enterprises 
Eidersoft 
Farmintel 

Four Systems 


Labochrome 


Rainbow Digital 
Strong Computer Systems 
Tandata 


PAUL MONAF 


to re-define all the keys. Up to 2K of : 
text or commands on each key. A must @) N 

for Quill or Archive users. £9.95 

Psientific Software, 37 Cottesmore ee os 

Road, Hessle,'N. Humberside. 01 222 9090 


Tel: 0482-649187 


T.K. Computerware 
Transform 
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Includinga —_——— 
four-part guide fae wes 
to using MOST OF 


L ocoscri “ithe LOCOSCRIPE 


FIRST ISSUE ON SALE AUGUST 8, 1986 


yy | \ 
' Place « an order with your newsagent now | 


Please reserve me a copy of the September/October issue of Putting Your Amstrad to Work-_ \ 
\ onsale August 8, 1986. \ 


\ Name | 


, Address \ 


STRONG COMPUTER SYSTEMS 


BRYN COTTAGE, PENIEL, CARMARTHEN, DYFED SA32 7DJ. TEL: 0267-231246 


- 128K QL Computer + Hopper + crazy painter 
— 640K QL Computer + Hopper + crazy painter 
— Sinclair Vision QL colour monitor 

- 128K QL Computer + Vision QL monitor 

- 640K QL Computer + Vision QL monitor 


All Systems supplied with convert utility and boot menu 


NEW SUPER Q-BOARD BY SANDY JUST 
3.5” DUAL DRIVES + SUPER Q-BOARD 
MIRACLE SYSTEMS 512K EXPANDERAM 
INTERNAL D.LY. 512K RAM BOARD 


ALL PRICES INCLUDE VAT + CARRIAGE 


For your QL communications needs — covers all the major inter- 
national FSK modem modes permitted in UK 


300/300 baud CCITT V21 Answer & Originate 
1200/75 baud CCITT V23 main channel ' 
75/1200 baud CCITT V23 back channei 
1200/1200 baud half duplex packet system 


Auto-dial and Auto-answer 


Centronics interface with 6KB buffer — for serial to centronics 
conversion or for printing incoming modem data. 


Comes complete with communications software for the QL — Prestel 
emulation, 40/80 column terminal emulation, text file transfer. N.B. 
software works with expanded QLs. 


Onboard microcomputer ensures correct data exchange with QL 
and provides split baud rates for V23 modem modes. 

The Astracom 1000 is controlled by software commands from 
keyboard or the communications software provided. Automatically 
reports mode and status and has inbuilt help menu. 

Auto-scan feature puts modem in correct mode to respond to 
incoming carrier. 


The Astracom 1000 has its own power supply and can be used with 
any computer that has a serial port, and so will work with a successor 
to your QL. Astracom intend to provide communications software 
for a wide range of computers. 


The Astracom 1000 is 7 inches wide by 8 inches deep and 1.5 inches high. It comes complete with software, manual and serial cable, all for 


UP TO £50 OFF YOUR 
OLD MODEM 


PHONE OUR HOTLINE 
FOR DETAILS NOW! 


Not BT approved, 
BT approval applied for 


Astracom, 13 Beechwood Road, Uplands, Swansea SA2 OWL 


Prices include VAT & Carriage ; 
Astracom 1000 Multistandard Modem £198.95 
Q Term terminal emulation with error correcting file transfer facility £19.95 
Citadel Membership QL bulletin board with free down-loadable software £19.95 


Please make cheques payable to Astracom 
For free data sheet or further information phone 0792 473697 anytime 


640K THROUGH _ 
TOTAL PORT | 
RAM ce FOR 

i pieeehie DISC /F 
BLACK LOW 
METAL POWER 
COVER DESIGN 


£125.00 including P & P and VAT 


Miracle Systems EXPANDERAM 512K increases the memory capacity of your QL from 

128K to a full 640K, and still lets you add on adisc interface afterwards. This is possible 

because the EXPANDERAM 512K has a through connector like the one inside the QL 

and has been engineered to have a very low power consumption leaving ample power 

for any of the currently available disc interfaces, e.g. Cumana, etc. A black metal cover 

is also provided with the EXPANDERAM 512K which will protect a disc interface as 

well. When the EXPANDERAM 512K is plugged into your QL you will not only be able 

to handle longer QUILL documents, larger ARCHIVE databases and bigger ABACUS 
spreadsheets, but will also have the advantage of programs running faster particularly 
those which frequently access microdrives. The EXPANDERAM 512K costs just 
£125.00 and has a full 12 month warranty. Additionally, if you order directly from us 

then you have the option of returning it to us in the first 14 days following purchase 

for a full refund should it not be to your satisfaction. If you have an ACCESS/ 

MASTERCARD or VISA then ordering by phone on (0272) 603871 x210 will give you 

same day despatch. 


MIRACLE SYSTEMS LTD, AVONDALE WORKSHOPS, 
WOODLAND WAY, KINGSWOOD, BRISTOL BS15 1QL 


A A A SNS Oe SN A SS OE SN NRT ET A AS TO NN A SA GR GS RO Ee ee 
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Please send me... EXPANDERAM 512K(s) @ £125 each | 


Enclosed is a cheque to the value of £ 
Please debit my ACCESS/MASTERCARD/VISA 


number: [| | | [TTT TTT tt oI | 


